WORLD iNTELLECTUry:.. PROPERTY ORGANIZATION 
Inteniational Bureau 



PCX 

INTERNATIONAL APPLICATION PUBLISHED UNDER THE PATENT COOPERATION TREATY (PCT) 



(51) International Patent Classification ^ 
H04J 1/02 



A2 



(11) International Publication Number: 
(43) International Publication Date: 



WO 98/19410 

7 May 1998 (07.05.98) 



(21) International Application Number: PCT/US97/1891 1 

(22) International Filing Date: 22 October 1997 (22.10.97) 



(30) Priority Data: 

9622728^ 
9720550-4 



3 1 October 1 996 (3 1 . 1 0.96) GB 
26 September 1997 (26.09.97) GB 



(71) Applicant: DISCOVISION ASSOCIATES [US/US]; Suite 200. 

2355 Main Street, P.O. Box 19616, Irvine. CA 92623 (US). 

(72) Inventors: ALAM, Dawood; 15 Wcstbury Park. Durdliam 

Down, Bristol BS6 7JA (GB). COLLINS, Matthew, 
James; Flat 1. 4 New King Street. Bath BAl 2BN (GB). 
DAVIES, David, Huw; 6 Glen Brook, Glen Drive, Stoke 
Bishop, Bristol BS9 I SB (GB). KEEVILL. Peter, Anthony; 
7 Junction Road, Oldfield Park, Bath BA2 3NQ (GB). 
NOLAN, John, Matthew; 19 The Firs, Combe Down, Bath, 
Somerset BA2 5ED (GB). FOXCROFT. Thomas; 52B 
Pembroke Road, Clifton, Bristol BS8 3DT (GB). PARKER, 
Jonathan; 66 Third Avenue, Oldfield Park, Bath BA2 3NZ 
(GB). 

(74) Agent: BICKEL. Arthur, S.; Suite 200, 2355 Main Street, P.O. 
Box 19616. Irvine. CA 92623 (US). 



(81) Designated States: AL, AM. AT. AU, AZ, BB. BG. BR, BY. 
CA, CH. CN, CU. CZ, DE. DK, EE, ES. FI, GB. GE, HU, 
IL, IS, JP. KE. KG. KP. KR. KZ, LK. LR. LS, LT. LU. 
LV, MD, MG, MK, MN, MW, MX. NO, NZ. PL. PT. RO. 
RU. SD, SE, SG. SI, SK, TJ. TM, TR. TT. UA. UG, UZ. 
VN. ARIPO patent (GH. KE. LS. MW, SD, SZ, UG. ZW), 
Eurasian patent (AM, AZ. BY. KG, KZ, MD, RU, TJ. TM), 
European patent (AT, BE, CH, DE. DK, ES, FI, FR, GB. 
GR, IE. IT, LU, MC. NL. PT. SE). OAPI patent (BF. BJ, 
CF. CG. CI, CM, GA, GN, ML. MR, NE, SN, TD. TG). 



Published 

Without international search report and to be republished 
upon receipt of that report. 



(54) Titic: SINGLE CHIP VLSI IMPLEMENTATION OF A DIGITAL RECEIVER EMPLOYING ORTHOGONAL FREQUENCY 
DIVISION MULTIPLEXING 



126 



CLOCK 



-128 



•130 



SCLK 



I ^ 1 






TUNER 




ADC 



138 



~y AGC" 




MPEG 

TRANSPORT 
STREAM 

OUTCLK 
SYNC 
ERROR 
VAUO 



HOST PROCESSOR >^U2 
INTERFACE ^ 
(SERIAL OR PARALLEL) 



(57) Abstract 

The invention provides a single chip implementation of a digital receiver for muittcarrier signals that are transmitted by orthogonal 
frequency division multiplexing. Improved channel estimation and correction circuitry are provided. The receiver has highly accurate 
sampling rate control and frequccy control circuitry. BCH decoding of tps data carriers is achieved with minimal resources with an 
arrangement that includes a small Galois field multiplier. An improved FFT window synchronization circuit is coupled to the r esampling 
circuit for locating the boundary of the guard interval transmitted with the active frame of the signal. A real-time pipelined FFT processor 
is operationally associated with the FFT window synchronization circuit and operates with reduced memory requirements. 
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SINGLE CHIP VLSI IMPLEMENTATION OF A DIGITAL RECEIVER EMPLOYING 
ORTHOGONAL FREQUENCY DIVISION MULTIPLEXING . 

5 This invention relates to receivers of electromagnetic signals employing 

multican-ier modulation. More particularly this invention relates to a digital receiver which 
is implemented on a single VLSI chip for receiving transmissions employing orthogonal 
frequency division multiplexing, and which is suitable for the reception of digital video 
broadcasts. 

10 Coded orthogonal frequency division multiplexing ("COFDM") has been proposed 

for digital audio and digital video broadcasting, both of which require efficient use of 
limited bandwidth, and a method of transmission which is reliable in the face of several 
effects. For example the impulse response of a typical channel can be modeled as the 
sum of a plurality of Dirac pulses having different delays. Each pulse is subject to a 

15 multiplication factor, in which the amplitude generally follows a Rayleigh law. Such a 
pulse train can extend over several microseconds, making unencoded transmission at 
high bit rates unreliable, in addition to random noise, impulse noise, and fading, other 
major difficulties in digital terrestrial transmissions at high data rates include multipath 
propagation, and adjacent channel interference, where the nearby frequencies have 

20 highly correlated signal variations. COFDM is particularly suitable for these applications. 
In practical COFDM arrangements, relatively small amounts of data are modulated onto 
each of a large number of carriers that are closely spaced in frequency. The duration 
of a data symbol is increased in the same ratio as the number of carriers or 
subchannels, so that inter-symbol interference is markedly reduced. 

25 Multiplexing according to COFDM is illustrated in Figs. 1 and 2, wherein the 

spectrum of a single COFDM carrier or subchannel is indicated by line 2. A set of carrier 
frequencies is indicated by the superimposed waveforms in Fig. 2. where orthogonality 
conditions are satisfied. In general two real-valued functions are orthogonal if 



|n;p(t)i4Jq(t)dt = K (1) 

a 

where K is a constant, and K = 0 if p * q; K ^^0 if p = q. Practical encoding and decoding 
of signals according to COFDM relies heavily on the fast Fourier transform ("FFT"), as 
35 can be appreciated from the following equations. 
The signal of a carrier c is given by 

s,(t) = A,(t)e''"='-*'=^'" (2) 
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where is the data at time t, (0^ is the frequency of the carrier, and <t>c is the phase. N 
carriers in the COFDM signal is given by 



s,(t) = (1/N) Yl A„(t)e (3) 



n = 0 



(0„ r: (Oq + nAO) (4) 
Sampling over one symbol period, then 

*c(t) (5) 

A=(t)=^A„ (6) 
With a sampling frequency of 1/T, the resulting signal is represented by 

n = 0 



(7) 



Sampling over the period of one data symbol t = NT. with cOq = 0, 

N -1 

20 S3(kT) = (1/N) f^^Qi%Hr^c.i^)k^ ^g) 

n = 0 

which compares with the general form of the inverse discrete Fourier transform: 



N -1 



g(kT) = (1/N) ^ G(n/(l<T))e'"""^N> (9) 
25 " = 0 

In the above equations Ane'*^ is the input signal in the sampled frequency domain, and 
Ss(kT) is the time domain representation. It is known that increasing the size of the FFT 
provides longer symbol durations and improves ruggedness of the system as regards 
echoes which exceed the length of the guard inten/al. However computational 

30 complexity increases according to NIogsN. and is a practical limitation. 

In the presence of intersymbol interference caused by the transmission channel, 
orthogonality between the signals is not maintained. One approach to this problem has 
been to deliberately sacrifice some of the emitted energy by preceding each symbol in 
the time domain by an interval which exceeds the memory of the channel, and any 

35 multipath delay. The "guard interval" so chosen is large enough to absorb any 
intersymbol interference, and is established by preceding each symbol by a replication 
of a portion of itself. The replication is typically a cyclic extension of the tenminal portion 
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of the symbol. Referring to Fig. 3, a data symbol 4 has an active interval 6 which 
contains all the data transmitted in the symbol. The terminal portion 8 of the active 
interval 6 is repeated at the beginning of the symbol as the guard inte.rval 10. The 
COFDM signal is represented by the solid line 12. It is possible to cyclically repeat the 
5 initial portion of the active interval 6 at the end of the symbol. 

Transmission of COFDM data can be accomplished according to the known 
general scheme shown in Fig. 4. A serial data stream 14 is converted to a series of 
parallel streams 16 in a serial-to-parallel converter 18. Each of the parallel streams 16 
is grouped into x bits each to form a complex number, where x determines the signal 

10 constellation of its associated parallel stream. After outer coding and interleaving in 
block 20 pilot carriers are inserted via a signal mapper 22 for use in synchronization and 
channel estimation in the receiver. The pilot carriers are typically of two types. Continual 
pilot earners are transmitted in the same location in each symbol, with the same phase 
and amplitude. In the receiver, these are utilized for phase noise cancellation, automatic 

15 frequency control, and time/sampling synchronization. Scattered pilot carriers are 
distributed throughout the symbol, and their location typically changes from symbol to 
symbol. They are primarily useful in channel estimation. Next the complex numbers are 
modulated at baseband by the inverse fast fourier transform ("IFFT") in block 24. A 
guard inten/al is then inserted at block 26. The discrete symbols are then converted to 

20 analog, typically low-pass filtered, and then upconverted to radiofrequency in block 28. 
The signal is then transmitted through a channel 30 and received in a receiver 32. As 
is well known in the art, the receiver applies an inverse of the transmission process to 
obtain the transmitted information. In particular an FFT is applied to demodulate the 
signal. 

25 A modern application of COFDM has been proposed in the European Telecommu- 

nications Standard ETS 300 744 (March 1997), which specifies the framing structure, 
channel coding, and modulation for digital terrestrial television. The specification was 
designed to accommodate digital terrestrial television within the existing spectrum 
allocation for analog transmissions, yet provide adequate protection against high levels 

30 of co-channel interference and adjacent channel interference. A flexible guard interval 
is specified, so that the system can support diverse network configurations, while 
maintaining high spectral efficiency, and sufficient protection against co-channel 
interference and adjacent channel interference from existing PAL/SECAM sen/ices. The 
noted European Telecommunications Standard defines two modes of operation. A "2K 

35 mode", suitable for single transmitter operation and for small single frequency networks 
with limited transmitterdistances. An "8K mode" can be used for either single transmitter 
operation or for large single frequency networks. Various levels of quadrature amplitude 
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modulation ("QAM") are supported, as are different inner code rates, in order to balance 
bit rate against ruggedness. The system is intended to accommodate a transport layer 
according to the Moving Picture Experts Group ("MPEG"), and is directly compatible with 
MPEG-2 coded TV signals (ISO/IEC 13818). 
5 In the noted European Telecommunications Standard data carriers in a COFDM 

frame can be either quadrature phase shift keyed ("QPSK"), 16-QAM. 64-QAM. non- 
uniform 16-QAM, or non-uniform 64-QAM using Gray mapping. 

An important problem in the reception of COFDM transmission is difficulty in 
maintaining synchronization due to phase noise and jitter which arise from upconversion 
1 0 prior to transmission, downconversion in the receiver, and the front end oscillator in the 
tuner, which is typically a voltage controlled oscillator. Except for provision of pilot 
carriers to aid in synchronization during demodulation, these issues are not specifically 
addressed in the noted European Telecommunications Standard, but are left for the 
implementer to solve. 

15 Basically phase disturbances are of two types. First, noisy components which 

disturb neighbor carriers in a multicarrier system are called the "foreign noise 
contribution" ("FNC"). Second, a noisy component which disturbs its own carrier is 
referred to as the "own noise contribution". 

Referring to Fig. 5, the position of ideal constellation samples are indicated by "x" 

20 symbols 34. The effect of foreign noise contribution is stochastic, resulting in Gaussian- 
like.noise. Samples perturbed in this manner are indicated on Fig. 5 as circles 36. The 
effects of the own noise contribution is a common rotation of all constellation points, 
indicated as a displacement between each "x" symbol 34 and its associated circle 36. 
This is referred to as the "common phase error", which notably changes from symbol to 

25 symbol, and must therefore be recalculated each symbol period Tg. The common phase 
error may also be interpreted as a mean phase deviation during the symbol period Tg. 

In order for the receiver 32 to process the data symbols in a practical system, a 
mathematical operation is performed on the complex signal representing each data 
symbol. Generally this is an FFT. For valid results to be obtained, a particular form of 

30 timing, synchronization is required in order to align the FFT interval with the received 
data symbol. 

It is therefore a primary object of the invention to provide a highly integrated, low 
cost apparatus for the reception of digital broadcasts, such as terrestrial digital video 
broadcasts, which is implemented on a single VLSI chip. 

is another object of the invention to provide an improved method and apparatus 
for synchronizing a received data symbol with an FFT window in signals transmitted 
according to COFDM. 
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It is yet another object of the invention to improve the stability of digital multicarrier 
receivers in respect of channel estimation. 

It is still another object of the invention to improve the automatic frequency control 
circuitry employed in multicarrier digital receivers. 
5 It is a further object of the invention to improve the automatic sampling rate control 

circuitry employed in multicarrier digital receivers. 

The invention provides a digital receiverfor multicarriersignals that are transmitted 
by orthogonal frequency division multiplexing. The multicarrier signal carries a stream 
of data symbols having an active interval, and a guard intenyal in which the guard 

10 interval is a replication of a portion of the active interval. In the receiver an analog to 
digital converter is coupled to a front end amplifier. An l/Q demodulator is provided for 
recovering in phase and quadrature components from data sampled by the analog to 
digital converter, and an automatic gain control circuit is coupled to the analog to digital 
converter. In a low pass filter circuit accepting I and Q data from the l/Q demodulator, 

15 the I and Q data are decimated and provided to a resampling circuit. An interpolator in 
the resampling circuit accepts the decimated I and Q data at a first rate and outputs 
resampled I and Q data at a second rate. An FFT window synchronization circuit is 
coupled to the resampling circuit for locating a boundarv of the guard interval. A real- 
time pipelined FFT processor is operationally associated with the FFT window 

20 synchronization circuit. Each stage of the FFT processor has a complex coefficient 
multiplier, and an associated memory with a lookup table defined therein for multipli- 
cands being multiplied in the complex coefficient multiplier. Each multiplicand in the 
lookup table is unique in value. A monitor circuit responsive to the FFT window 
synchronization circuit detects a predetermined indication that a boundary between an 

25 active symbol and a guard interval has been located. 

According to an aspect of the invention the FFT window synchronization circuit has 
a first delay element accepting currently arriving resampled I and Q data, and outputting 
delayed resampled I and Q data. A subtracter produces a signal representative of the 
difference between the currently arriving resampled I and Q data and the delayed 

30 resampled I and Q data, in a first circuit the subtracter output signal is converted to a 
signal having a unipolar magnitude, which is preferably the absolute value of the signal 
provided by the subtracter. A second delay element stores the output signal of the first 
circuit, and a third delay element receives the delayed output of the second delay 
element. In a second circuit a statistical relationship is calculated between data stored 

35 in the second delay element and data stored in the third delay element. The output of 
the FFT window synchronization circuit is representative of the statistical relationship. 
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Preferably the statistical relationship is the F ratio. The FFT processor is capable of 
operation in a 2K mode and in an 8K mode. 

The FFT processor has an address generatorfor the memory of each stage, which 
accepts a signal representing the orderdependency of a currently required multiplicand. 
5 and generates an address of the memory wherein the currently required multiplicand is 
stored. In a further aspect of the invention each multiplicand is stored in the lookup table 
in order of its respective order dependency for multiplication by the complex coefficient 
multiplier, so that the order dependencies of the multiplicands define an incrementation 
sequence. The address generator has an accumulator for storing a previous address 

10 that was generated thereby, a circuit for calculating an incrementation value of the 
currently required multiplicand responsive to the incrementation sequence, and an 
adder for adding the incrementation value to the previous address. 

In another aspect of the Invention there are a plurality of incrementation 
sequences. The multiplicands are stored in row order, wherein in a first row a first 

1 5 incrementation sequence is 0, in a second row a second incrementation sequence is 1 , 
in a third row first and second break points B1, B2 of a third incrementation sequence 
are respectively determined by the relationships 

20 "=o 

n=0 

and in a fourth row a third break point B3 of a third incrementation sequence is 
25 determined by the relationship 

83^ = 2 X 4^ + 2 

wherein represents the memory of an Nth stage of the FFT processor. 

The receiver provides channel estimation and correction circuitry. Pilot location 

30 circuitry receives a transformed digital signal representing a frame from the FFT 
processor, and identifies the position of pilot carriers therein. The pilot carriers are 
spaced apart in a carrier spectrum of the transformed digital signal at intervals K and 
have predetermined magnitudes. The pilot location circuitry has a first circuit for 
computing an order of carriers in the transformed digital signal, positions of said carriers 

35 being calculated modulo K. There are K accumulators coupled to the second circuit for 
accumulating magnitudes of the carriers in the transformed digital signal, the 
accumulated magnitudes defining a set. A correlation circuit is provided for correlating 
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K sets of accumulated magnitude values with the predetemiined magnitudes. In the 
correlation a first member having a position calculated modulo K in of each of the K sets 
is uniquely offset from a start position of the frame. 

According to anotheraspect of the invention the pilot location circuitry also has a 
5 bit reversal circuit for reversing the bit order of the transformed digital signal. 

According to yet another aspect of the invention amplitudes are used to represent 
the magnitudes of the carriers. Preferably the magnitudes of the carriers and the 
predetermined magnitudes are absolute values. 

In a further aspect of the invention the correlation circuitry also has a peak tracking 
1 0 circuit for determining the spacing between a first peak and a second peak of the K sets 
of accumulated magnitudes, wherein the first peak is the maximum magnitude, and the 
second peak is the second highest magnitude. 

The channel estimation and correction circuitry also has an interpolating filter for 
estimating the channel response between the pilot carriers, and a multiplication circuit 
15 for multiplying data carriers output by the FFT processor with a correction coefficient 
produced by the interpolating filter. 

The channel estimation and correction circuitry also has a phase extraction circuit 
accepting a data stream of phase-uncorrected I and Q data from the FFT processor, 
and producing a signal representative of the phase angle of the uncorrected data. The 
20 phase extraction circuit includes an accumulator for the phase angles of succeeding 
phase-uncorrected I and Q data. 

According to an aspect of the invention the channel estimation and correction 
circuitry includes an automatic frequency control circuit coupled to the phase extraction 
circuit, in which a memory stores the accumulated common phase error of a first symbol 
25 carried in the phase-uncorrected I and Q data. An accumulator is coupled to the 
memory and accumulates differences between the common phase error of a plurality 
of pilot carriers in a second symbol and the common phase error of corresponding pilot 
carriers in the first symbol. The output of the accumulator is filtered, and coupled to the 
l/Q demodulator. 

30 According to another aspect of the invention the coupled output of the accumula- 

tor of the automatic frequency control circuit is enabled in the l/Q demodulator only 
during reception of a guard interval therein. 

According to yet another aspect of the invention the channel estimation and 
correction circuitry also has an automatic sampling rate control circuit coupled to the 

35 phase extraction circuit, in which a memory stores the individual accumulated phase 
errors of pilot carriers in a first symbol carried in the phase-uncorrected I and Q data. 
An accumulator is coupled to the memory and accumulates differences between the 
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phase errors of individual pilot carriers , in a second symbol and phase errors of 
corresponding pilot carriers In the first symbol to define a plurality of accumulated 
intersymbol carrier phase error differentials. A phase slope is defined by a difference 
between a first accumulated intersymbol carrier phase differential and a second 
5 accumulated intersymbol carrier phase differential. The output of the accumulator is 
filtered and coupled to the l/Q demodulator. 

According to one aspect of the invention the sampling rate control circuit stores a 
plurality of accumulated intersymbol carrier phase error differentials and computes a line 
of best fit therebetween. 

10 According to another aspect of the invention the coupled output signal of the 

accumulator of the automatic sampling rate control circuit is enabled in the resampling 
circuit only during reception of a guard interval therein. 

According to an aspect of the invention a common memory for storing output of the 
phase extraction circuit is coupled to the automatic frequency control circuit and to the 
15 automatic sampling rate control circuit. 

According to another aspect of the invention the phase extraction circuit also has 
a pipelined circuit for iteratively computing the arctangent of an angle of rotation 
according to the series 

20 tan-^x) = X-— + — -iil-nill-. . ., |x|<i 

3 5 7 9 

wherein x is a ratio of the phase-uncorrected I and Q data. 

The pipelined circuit includes a constant coefficient multiplier, and a multiplexer for 
selecting one of a plurality of constant coefficients of the series. An output of the 

25 multiplexer is connected to an input of the constant coefficient multiplier. 

According to still another aspect of the invention the pipelined circuit has a 
multiplier, a first memory for storing the quantity x^, wherein the first memory is coupled 
to a first input of the multiplier, and has a second memory for holding an output of the 
multiplier. A feedback connection is provided between the second memory and a 

30 second input of the multiplier. The pipelined circuit also has a third memory for storing 
the value of the series. Under direction of a control circuit coupled to the third memory, 
the pipeline circuit computes N terms of the series, and also computes N+1 terms of the 
series. An averaging circuit is also coupled to the third memory and computes the 
average of N terms and N+1 tenms of the series. 

35 Data transmitted in a pilot carrier of the multicarrier signal is BCH encoded 

according to a code generator polynomial h(x). A demodulator operative on the BCH 
encoded data is provided, which includes an iterative pipelined BCH decoding circuit. 
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The BCH decoding circuit is circuit coupled to the demodulator. It forms a Galois Field 
of the polynomial, and calculates a plurality of syndromes therewith. The BCH decoding 
circuit includes a plurality of storage registers, each storing a respective one of the 
syndromes, and a plurality of feedback shift registers, each accepting data from a 
5 respective one of the storage registers. The BCH decoding circuit has a plurality of 
Galois field multipliers. Each of the multipliers is connected in a feedback loop across 
a respective one of the feedback shift registers and multiplies the output of its 
associated feedback shift register by an alpha value of the Galois Field. An output 
Galois field multiplier multiplies the outputs of two of the feedback shift registers. 

10 A logical network forms an error detection circuit connected to the feedback shift 

registers and to the output Galois field multiplier. The output of the error detection circuit 
indicates an error in a current bit of data, and a feedback line is enabled by the error 
detection logic and connected to the storage registers. Using the feedback line, the data 
output by the feedback shift registers are written back into the storage registers for use 

15 in a second iteration. 

According to an aspect of the invention the output Galois field multiplier has a first 
register initially storing a first multiplicand A, a constant coefficient multiplier connected 
to the first register for multiplication by a value a. An output of the constant coefficient 
multiplier is connected to the first register to define a first feedback loop, whereby in a 

20 kth cycle of clocked operation the first register contains a Galois field product Aa'^. A 
second register is provided for storing a second multiplicand B. An AND gate is 
connected to the second register and to the output of the constant coefficient multiplier. 
An adder has a first input connected to an output of the AND gate. An accumulator is 
connected to a second input of the adder, and the Galois field product AB is output by 

25 the adder. 

The invention provides a method for the estimation of a frequency response of a 
channel. It is performed by receiving from a channel an analog multicarrier signal that 
has a plurality of data carriers and scattered pilot carriers. The scattered pilot carriers 
are spaced apart at an interval N and are transmitted at a power that differs from the 

30 transmitted power of the data carriers. The analog multicarrier signal is converted to a 
digital representationthereof A Fouriertransform is performed on the digital representa- 
tion of the multicarrier signal to generate a transformed digital signal. The bit order of 
the transformed digital signal is reversed to generate a bit-order reversed signal. 
Magnitudes of the carriers in the bit-order reversed signal are cyclically accumulated in 

35 N accumulators, amd the accumulated magnitudes are correlated with the power of the 
scattered pilot carriers. Responsive to the correlation, a synchronizing signal is 
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generated that identifies a carrier position of the multicarrier signal, preferably an active 
carrier. 

According to anotheraspect of the invention the step of accumulating magnitudes 
is performed by adding absolute values of a real component of the bit-order reversed 
5 signal to respectiveabsolute values of imaginary components thereof to generate sums, 
and respectively storing the sums in the N accumulators. 

According to yet another aspect of the invention the step of correlating the 
accumulated magnitudes also is performed by identifying a first accumulator having the 
highest of the N values stored therein, which represents a first carrier position, and by 
10 identifying a second accumulator which has the second highest of the N values stored 
therein, which represents a second carrier position. The interval between the first carrier 
position and the second carrier position is then determined. 

To validate the consistency of the carrier position identification, the position of a 
carrier of a first symbol in the bit-order reversed signal is compared with a position of a 
15 corresponding carrier of a second symbol therein. 

Preferably interpolation is performed between pilot carriers to determine correction 
factors for respective intemnediate data carriers disposed therebetween, and 
respectively adjusting magnitudes of the intermediate data carriers according to the 
correction factors. 

20 According to an aspect of the invention a mean phase difference is determined 

between corresponding pilot carriers of successive symbols of the transformed digital 
signal. A first control signal representing the mean phase difference, is provided to 
control the frequency of reception of the multicarrier signal. The first control signal is 
enabled only during reception of a guard interval. 
25 Preferably a line of best fit is determined for the inter-symbol phase differences of 

multiple carriers to define a phase slope. 

For a better understanding of these and other objects of the present invention, 
reference is made to the detailed description of the invention, by way of example, which 
is to be read in conjunction with the following drawings, wherein: 
30 Fig. 1 illustrates the spectrum of a COFDM subchannel; 

Fig. 2 shows a frequency spectrum for multiple carriers in a COFDM signal; 
Fig. 3 is a diagram of a signal according to COFDM and shows a data symbol 
format; 

Fig. 4 is a block diagram illustrating an FFT based COFDM system; 
35 Fig. 5 illustrates certain perturbations in a COFDM signal constellation; 

Fig. 6 is a flow diagram of a method of timing synchronization according to a 
preferred embodiment of the invention; 
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Fig, 7 is a plot of an F ratio test performed on several data symbols for coarse 
timing synchronization; 

Fig. 8 is a plot of an incomplete beta function for different degrees of freedom; 

Fig. 9 is a plot helpful in understanding a test of statistical significance according 
5 to the invention; 

Fig. 10 is an electrical schematic of a synchronization circuit according to an 
alternate embodiment of the invention; 

Fig. 11 is an electrical schematic of a synchronization circuit according to another 
alternate embodiment of the invention; 
10 Fig. 12 is a block diagram of a single-chip embodiment of a digital receiver in 

accordance with the invention; 

Fig. 13 is a block diagram illustrating the front end of the digital receiver shown in 
Fig. 12 in further detail; 

Fig. 14 is a block diagram illustrating the FFT circuitry, channel estimation and 
15 correction circuitry of the digital receiver shown in Fig. 12; 

Fig. 1 5 is a block diagram illustrating another portion of the digital receiver shown 
in Fig. 12; 

Fig. 16 is a more detailed block diagram of the channel estimation and correction 
circuitry shown in Fig. 14; 
20 Fig. 1 7 is a schematic of the automatic gain control circuitry of the digital receiver 

shown in Fig. 12; 

Fig. 18 is a schematic of the l/Q demodulator of the digital receiver shown in Fig. 

12; 

Fig. 19 illustrates in greater detail a low pass filter shown in Fig. 13; 
25 Fig. 20 shows the response of the low pass filter shown in Fig. 19; 

Fig. 21 shows the resampling circuitry of the digital receiver shown in Fig. 12; 
Fig, 22 illustrates a portion of an interpolator in the resampling circuitry of Fig. 21; 
Fig. 23 is a more detailed block diagram of the FFT window circuitry shown in Fig. 

14; 

30 Fig. 24 is a schematic of a butterfly unit in the FFT calculation circuitry shown in 

Fig.14; 

Figs. 25 and 26 are schematics of butterfly units in accordance with the prior art; 
Fig. 27 is a schematic of a radix 2^ + 2 FFT processor in accordance with the 
invention; 

35 Fig. 28 is 32 point flow graph of the FFT processor shown in Fig. 27; 

Fig. 29 is a schematic of a configurable 2Ky8K radix 2^+2 single path, delay 
feedback pipelined FFT processor in accordance with the invention; 
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Fig. 30 is a detailed schematic of a complex multiplier used in the circuitry shown 
in Fig. 29; 

Fig. 31 is a detailed schematic of an alternateembqdimentof a complex multipliers 
used in the circuitry shown in Fig. 29; 
5 Fig. 32 is another diagram illustrating the organization of the twiddle factors for 

each of the multipliers in the circuitry shown in Fig. 29; 

Fig. 33 illustrates the organization of the twiddle factors for each of the multipliers 
in the circuitry shown in Fig. 29; 

Fig. 34 is a schematic of address generator used in the circuitry shown in Fig. 29; 
10 Fig. 35 is a schematic of a generalization of the address generator shown in Fig. 

34; 

Fig. 36 is a flow chart illustrating the process of pilot location conducted by the 
channel estimation and correction circuitry shown in Fig. 16; 

Fig. 37 is a flow chart of an embodiment of the pilot localization procedure 
15 according to the invention. 

Fig. 38 is a more detailed block diagram of the tps sequence block of the circuitry 
shown. in Fig. 14; 

Fig. 39 is a schematic of a BCH decoder used in the tps processing circuitry shown 
in Fig. 38; 

20 Fig. 40 is a more detailed schematic of a Galois field multiplier shown in Fig. 39; 

Fig. 41 is a block diagram generically illustrating the automatic sampling control 
and automatic frequency control loops of the digital receiver shown in Fig. 12; 

Fig. 42 is a more detailed block diagram of the automatic sampling control and 
automatic frequency control loops shown in Fig. 41 ; 
25 Fig. 43 is a more detailed block diagram of the phase extract block of the circuitry 

shown in Fig. 42; 

Fig. 44 is a schematic of the circuitry employed to calculate an arctangent in the 
block diagram shown in Fig. 43; 

Fig. 45 is a plot of the square en-or at different values of a of the Taylor expansion 
30 to 32 terms; 

Fig. 46 is a plot of the square error at different values of a of the Taylor expansion 
to 31 terms; 

Fig. 47 is a plot of the square error at different values of a of the average of the 
Taylor expansion to 31 and 32 terms; 

35 Fig. 48 is a plot of the phase differences of pilot carriers with a line of best fit 

shown; 
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Fig. 49 is a more detailed block diagram an alternate embodiment of the automatic 
sampling control and automatic frequency control loops shown in Fig. 41; 

Fig. 50 illustrates a coded constellation format used in the demapping circuitry of 
Fig. 15; 

5 Fig. 51 illustrates the conversion of I.Q data to binary data value using the format 

shown in Fig. 50; 

Fig. 52 is a more detailed block diagram of the symbol deinterleaving circuitry 
shown in Fig. 15; 

Fig. 53 is a more detailed block diagram of the bit deinterleaving circuitry shown 
10 in Fig. 15; 

Fig. 54 illustrates the conversion from a coded constellation format to a 24 bit soft 
l/Q format by the bit deinterleaving circuitry shown in Fig. 53; 

Fig. 55 is a more detailed block diagram of the microprocessor interface of the 
receiver shown in Fig, 12; 

15 Fig. 56 is a more detailed block diagram of the system controller of the receiver 

shown in Fig. 12; and 

Fig. 57 is a state diagram relating to channel acquisition in the system controller 
of the receiver shown in Fig. 56. 
Alignment of The FFT Window 

20 Referring again to Figs. 3 and 4. according to the invention a statistical method is 

applied to COFDM signals to find the end of the guard inten/al 10. This method is 
explained with reference to the above noted European Telecommunications Standard, 
but is applicable to many forms of frequency division multiplexing having prefixed or 
postfixed guard intervals. It allows the receiver 32 to find the end of the guard inten/al 

25 given only the received sampled complex signal ( solid line 1 2) and the size of the active 
inten/al 6 . The method relies on the fact that the guard interval 10 is a copy of the last 
part of the data symbol 4. In the receiver 32, due to echoes and noise from the channel 
and errors in the local oscillator, the guard interval 10 and the last part of the data 
symbol 4 will differ. If the errors introduced are random then a statistical method can be 

30 applied. According to the invention, the received complex signal is sampled at a rate 
which is nearly identical to that used in the transmitter. A difference signal is found for 
a pair of received samples which are separated by a period of time which is as close as 
possible to the active interval 6. This period should be equal to the size of the fast 
fourier transform ("FFT") being applied (i.e. 2048 or 8192 samples). Let 
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where Sj is the difference signal; ^ and ^.fi^stze ^he current and previous complex 
input samples of which the modulus is taken. That is, the subscript "i" indexes a linear 
time sequence of input values. Assuming that the input signal is random, then Sj is also 
random. Within the guard interval Sj and 54.^^5126 will be similar, although not identical, due 
5 to the effects of the channel. Sj will be therefore a random signal with a small dispersion. 
As used herein the term "dispersion" means generally the spread of values, and is not 
restricted to a particular mathematical definition. In general the active part of one symbol 
is not related to the active part of the next symbol. Outside of the guard interval Sj will 
be random with a much larger dispersion. In order to find the end of the guard interval. 

10 the dispersion of the difference signal Sj is monitored to look for a significant increase 
which will occur at the boundary of the guard interval 10 and the active interval 6. The 
inventors have also observed that a large decrease in dispersion is seen at the start of 
the guard interval 10. 

According to a preferred embodiment of the invention samples of the input signal 

1 5 are stored over an interval which includes at least one symbol period Tg. The dispersion 
of the difference signal Sj is calculated over a block of samples. The block is moved 
back in time over a number of samples, n, and the dispersion is recalculated. These two 
blocks are referred to herein as "comparison blocks". The ratio of a current dispersion 
in a first comparison block to the dispersion in a previous comparison block is found. 

20 Then, the F ratio significance test is used to find significant differences in the 
dispersions of the two comparison blocks. The F ratio is defined as 

VAR(i ) 

F (15) 

VAR(i-n) ^ ' 

25 where n is a positive integer, i indexes the input samples, and VAR(i) is the variance of 
a block of values of length N samples. Variance can be defined as 



(16) 



30 While the F ratio significance test is used in the preferred embodiment, other functions 
of the two dispersion values which give a signal relating to the change in dispersion 
could be used. There are many such functions. An advantage of the F ratio is that for 
a random input signal it has a known probability distribution, allowing convenient 
statistical analysis for purposes of performance analysis and system design. Also the 

35 F ratio intrinsically normalizes the signal, making the result independent of the signal 
level. 
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The method is disclosed with reference to Fig. 6, in which a first member of a 
sample pair in a current evaluation block is measured at step 38. A delay of one active 
interval 6 ( Fig. 3) is experienced in step 40. This may be accomplished with a digital 
delay such as a FIFO, or equivalently by buffering samples for an active interval in a 
5 memory and accessing appropriate cells of the memory. A second member of the 
sample pair is measured in step 42, and the difference between the first and second 
member is determined and stored in step 44. The end of the current block is tested at 
decision step 46. The size of the evaluation block should not exceed the length of a 
guard interval, and may be considerably smaller. In the event the end of the current 
10 block has not yet been reached, another sample is acquired at step 48, and control 
returns to step 38. 

If the end of the current block has been reached, the dispersion of the current 

block is measured in step 50, and is treated as one of two comparison blocks of data. 

A test is made at decision step 52 to determine if a group of two comparison blocks 
15 have been evaluated. If this test is negative, then another block of data is acquired in 

step 54, after which control returns to step 38. The other block of data need not be 

contiguous with the block just completed. 

In the event the test at decision step 52 is positive, the F ratio is computed for the 

group of two comparison blocks at step 56. The results obtained in step 56 are 
20 submitted to peak detection in step 60. Peak detection optionally includes statistical 

tests of significance, as is explained hereinbelow. 

If peaks are detected, then the boundary of a guard interval is established in step 

62 for purposes of synchronization of the FFT window which is necessary for further 

signal reconstruction. If peaks are not detected, the above process is repeated with a 
25 block of samples taken from another portion of the data stream. 

Example 1: 

Referring now to Fig. 7 a complex signal was generated according to the above 
noted European Telecommunications standard using a random number generator, and 
transmitted across a Ricean channel model together with added white Gaussian noise 

30 (SNR = 3,7). Data symbols were then analyzed according to the above described 
method. The results 6 data symbols are shown in Fig. 7, wherein the F ratio is plotted 
for convenience of presentation on a logarithmic axis as line 64, because the spikes 66, 
68, at the beginning and end of the guard intervals respectively, are very large. 

Although it is quite evident from Figure 7 that the ends of the guard intervals are 

35 easy to find using any of several well known peak detectors, it is possible to apply a 
statistical test to more accurately answer the question: do the two blocks of samples 
have the same dispersion? This is the null hypothesis, Hq, i.e. the dispersion is the 
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same and the observed spike in F is due to random fluctuations only. If Hq has very low 
probability it can be rejected, which would correspond to detection of the start or end of 
the guard interval. From the way the COFDM symbol is constructed Hq is expected to 
be true for comparison blocks lying entirely within the guard interval or within the active 
interval, but false when the comparison blocks straddle a boundary at the start or end 
of the guard interval. If comparison blocks of random samples are drawn from the same 
population then the probability of F is given by 

Q{F\v,,v,) = ^^,^) (17) 



where l() is the incomplete Beta function, 

X = — 



^2 ^ 



(18) 



15 and and v, are the number of degrees of freedom with which the first and second 
dispersions are estimated. In this example v1 = v2 = (N-1) if n >= N. The shape of the 
function is shown in Fig. 8. From a statistical point of view n should be sufficiently large 
so that the two blocks do not overlap, i.e. n >= N. If the blocks do overlap, then the 
calculation of the second dispersion will use samples used for the calculation of the first 

20 dispersion. This effectively reduces the number of degrees of freedom and hence the 
significance of the result. It has been detennined that setting n=N works well. 

The function Q() in equation (13) actually gives the one-tailed probability. Hq could 
be rejected if F is either very large or very small, and so the two-tailed test is required. 
Actually the two tails are identical, so for a two-tailed test the probability is double that 

25 given in equation (13). However, this results in values of probability greater than one for 
F<1. The probability, p, is therefore calculated as follows: 

P=2/J^,^) (19) 
2 2 

30 and then, if (p > 1), p = 2 - p. This probability reflects the viability of Hq. Thus if p is 
small, Hq can be rejected and it can be stated, with a specified degree of certainty, that 
the comparison blocks come from sample populations with different dispersion. The 
noted European Telecommunications Standard specification states that the block size, 
N. should be 32 for a correlation algorithm. N={32,64}have been successfully tried. The 

35 probability functions obtained are shown in Fig. 9 using these values for N. In the 
preferred embodiment p <= 0.05 has been set for the rejection of Hq. 



SOOCID: <WO . ..9819410A2 .1 > 



wo 98/19410 



PCT/US97/18911 



10 



17 

A precise implementation would be to calculate F, then then the incomplete Beta 
function, then p and then apply the threshold test. This algorithm would be very difficult 
to realize in hardware since the Beta function is very complicated. In the preferred 
embodiment it is much simpler, and gives the same results, to set the acceptance 
threshold and N parameter and thus define an upper and lower limit for F. It is then only 
necessary to calculate F and compare it with the limits. In order to simply find the end 
of the guard interval it may be safely assumed that F>1. Only the upper limit on F is 
needed. To calculate the limits on F accurately, a suitable root-finding method, such as 
Newton-Raphson may be utilized. Typical values are given in Table 1. 

Table 1 



p threshold 


v1 = v2 = 31 


v1 = v2 = 63 


F lower 


F_upper 


F lower 


F_upper 


0.2 


0.627419 


1.593832 


0.722591 


1.383909 


0.1 


0.548808 


1.822132 


0.658620 


1.518326 


0.05 


0.488143 


2.048582 


0.607525 


1 .646022 


0.01 


0.386894 


2.584689 


0.518205 


1.929738 


0.005 


0.354055 


2.824422 


0.487936 


2.049448 


0.001 


0.293234 


3.410251 


0.429794 


2.326695 


10^ 




4.337235 






10-5 




5.393528 






10-^ 




6.605896 






10-'^ 




8.002969 






io-« 




9.616664 







15 



20 



25 This method has been successfully tested using the specified channel mode! with 

additive white Gaussian noise (SNR=3.7). 

The formula for dispersion given in Equation (12) would require a multiplier for 
implementation in silicon. The calculation of F is a division in which the (N-1) 
normalisation constants cancel out as long as the two blocks have the same size. 

30 Accurate multiplication and division can be expensive in silicon. In the preferred 
embodiment simplifications have been implemented which give less accurate, but still 
viable, values for F. S■^ can be assumed to have zero mean so it is not necessary to 
calculate the mean from the block of samples. This also increases the number of 
degrees of freedom from (N-l) to N. Instead of calculating variance using the standard 
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sum of squares formula, the dispersion can be estimated by the mean absolute 
deviation. The formula for VAR(I) becomes 



VAR(i) = — 
N 



N-1 



E is,.,i 

V i=o 



(20) 



10 



The (1/N) factor divides out in the calculation of F if the two blocks have the same size. 
But there still remains the division of the two dispersions and the squaring required. 
These can be tackled using logarithms to the base 2. Substituting from Equation (16) 
into Equation (11) gives 



15 



F = 



A/-1 



Taking logs to the base 2 gives 



(21) 



20 



25 



30 



35 



logF = 2(logs3-logsJ = y 



(22) 



It is then only necessary to calculate y and compare it with the logarithm to the base 2 
of the F upper limit. The comparison can be made by subtracting the log of the limit from 
2(log2sa-log2sb) and comparing with zero. The factor of 2 can be absorbed into the 
limit. 

Calculation of the logs to base two is relatively straightforward in hardware if the 
numbers are stored as fixed point fractions. The fractions can be split into an exponent 
and a fractional mantissa: x = A2^. Taking log base 2 gives logx = logA + B Since A is 
fractional it is practical to find its logarithm using a lookup table. The exponent B can be 
found from the position of the MSB (since Sg and s^ will both be positive numbers). 

The calculation can thus be reduced to require only addition and subtraction 
arithmetic operations. The limit should also be recalculated using v1=v2=N if using this 
method. In practice, the significance level may be set empirically for a particular 
application, preferably p = 0.05. 

It will be appreciated by those skilled in the art that various measures of dispersion 
may be utilized without departing from the spirit of the invention, for example the 
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standard deviation, skew, various moments, histograms, and other calculations known 
in the art. 

In a first alternate embodiment of the invention, the above described method is 
employed using either the real or the imaginary parts of the signal instead of the 
modulus. This embodiment achieves economy in hardware. 

In a second alternate embodiment of the invention, the n parameter of equation 
(11) has been optimized. At the end of the guard inten/al, the two blocks straddle more 
of the transition to the active interval^ giving a well-defined increase in the dispersion. 
Using any value n>2 has the drawback that several successive points will give 
significant increases as the later block travels up to the boundary. This small problem 
is easily overcome by introducing a dead period after detection of the boundary. That 
is. once a spike has been detected a set of samples equal to the size of the FFT window 
is accepted before further attempts are made to locate another spike. The dead period 
has the added benefit of not introducing false spikes. When using larger values of n the 
spikes 66, 68 ( Fig. 7) increase, whilst the Hq noisy F signal remain much the same. 
Example 2: 

The maximum F-spike height as a function of n has been measured systematically 
together with the background variation in F. The results are shown in Table 2. 



Table 2 



(1) 


(2) 


(3) 


(4) 


(5) 


n 


<F> 






(4) / (3) 


3 


1.0009 


0.07 


7.5 


107 


5 


1.0012 


0.10 


10.7 


107 


10 


1.0011 


0.14 


12.9 


92 


15 


1.0014 


0.17 


16.7 


98 


20 


1.0014 


0.19 


19.3 


102 


30 


1.0012 


0.23 


20.9 


91 


40 


0.9975 


0.24 


22.0 


92 


50 


0.9926 


0.25 


20.4 


81.6 



Table 2 was developed using the first 5 frames of the signal analyzed in Fig. 7. 
The statistics in columns (2) and (3) of Table 2 were made by excluding any points 
where F>=3.0 to exclude spikes from the calculations. The spikes would othen^/ise affect 
the values of mean and standard deviation even though they are from a different 
statistical population. 
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The results indicate that the background variation in F. f^ ^. , was affected by n, 
increasing asymptotically to a value of approximately 0.28. It is likely that this is the 
effect of overlapping blocks. For example, for N=64 and n<64. the blocks over which the 
dispersions are calculated will contain some of the same values and therefore be 
correlated. To test this theory Fs.d. was evaluated for n>N. and the results are shown 
in Table 3. 



n 




60 


0.258 


70 


0.266 


80 


0.270 


90 


0.278 


100 


0.285 


128 


0.297 


256 


0.366 



10 



15 



20 



25 



30 



35 



The dependence becomes linear at n >= N/2. If F is calculated every n samples, 
rather than every sample, then this dependence may be reduced. However, this creates 
a risk for small guard intervals of not having the first block wholly within the guard 
interval and the second wholly within the active interval. 

A third alternate embodiment of the invention is disclosed with reference to Fig. 10, 
which schematically illustrates a timing synchronization circuit 70. The circuit accepts 
a complex input signal 72, and includes a circuit module 74 which develops the modulus 
of its input, which is taken from node 83. the circuit module 74 insures that the value 
being subsequently processed is an unsigned number. The input to the circuit module 
74 is a difference signal which is developed by a subtracter 75 which takes as inputs the 
input signal 72 and a delayed version of the input signal 72 which has been processed 
through a delay circuit 79. preferably realized as a FIFO 77 of length L, where L is the 
size of the FFT window. As explained above, it is also possible to operate this circuit 
where the input signal 72 is real, imaginary, or complex, or even the modulus of a 
complex number. In the case where the input signal 72 is real, or imaginary, the circuit 
module 74 can be modified, and can be any known circuit that removes the sign of the 
output of the subtracter 75. or equivalently sets the sign so that the outputs accumulate 
monotonically; i.e. the circuit has a unipolar output. The output of the circuit module 74 
is ultimately clocked into a digital delay, which is preferably implemented as a FIFO 78. 
When the FIFO 78 is full, a signal SIG1 80 is asserted, and the output of the FIFO 78 
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becomes available, as indicated by the AND gate 82. An adder/subtracter circuit 84 is 
also connected to the node 76. and its output is stored in a register 86. A delayed 
version of the output of the adder/subtractercircuit 84 is taken from the register 86 and 
fed back as a second input to the adder/subtractercircuit 84 on line 88. In the event the 
5 signal SIG1 80 has been asserted, a version of the output of the circuit module 74, 
delayed by a first predetermined inten/al N, where N is the number of samples in the 
comparison blocks, is subtracted from the signal on node 76. 

The signal on line 88 is an index into a lookup table, preferably implemented as 
a read-only-memory ("ROM"), and shown as ROM 90. The address of the ROM 90 
10 contains the logarithm to the base 2 of the magnitude of the signal on line 88, which 
then appears at node 92. The node 92 is connected to a subtracter 94, and to a delay 
circuit, shown as FIFO 98, which is used to develop the denominator of the middle term 
of equation (17). 

The subtracter 94 produces a signal which is compared against the log2 of a 
15 predetermined threshold value Fy^iT *r» a comparison circuit 106, shown for simplicity 
as an adder 108 connected to a comparator 110. The output signal SYNC 112 is 
asserted when the boundary of a guard interval has been located. 

Although not implemented in the presently preferred embodiment, It is also 
possible to configure the size of the FIFO 77 dynamically, so that the size of the interval 
20 being evaluated can be adjusted according to operating conditions. This may 
conveniently be done by storing the values on the node 92 in a RAM 1 14 for computa- 
tion of their dispersion. 

In a fourth alternate embodiment of the invention, explained with reference to Fig. 
11, components similar to those of the embodiment shown in Fig. 10 have the same 
25 reference numerals. A timing synchronization circuit 115 is similar to the timing 
synchronization circuit 70, except now the delay circuit 79 is realized as the FIFO 77, 
and another FIFO 100, one of which is selected by a multiplexer 102. Both of the FIFOs 
'77, 100 provide the same delay; however the capacities of the two are different. The 
FIFO 100 provides for storage of samples taken in an interval equal to the size of the 
30 FFT window, and is normally selected in a first m.ode of operation, for example during 
channel acquisition, when it is necessary to evaluate an entire symbol in order to locate 
a boundary of a guard interval. In the noted European Telecommunications standard, 
up to 8K of data storage is required, with commensurate resource requirements. During 
subsequent operation, the approximate location of the guard interval boundaries will be 
35 known from the history of the previous symbols. In a second mode of operation. It is 
therefore only necessary to evaluate a much smaller interval in order to verify the exact 
location of the guard interval boundary. The number of samples used in the computation 
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of the dispersion can be kept to a small number, preferably 32 or 64, and the rinuch 
smaller FIFO 77 accordingly selected to hold the computed values. The resources 
saved thereby can be utilized for other functions in the demodulator, and memory 
utilized by the larger FIFO 100 may also be reallocated for other purposes. 
5 A control block 81 optionally advances the evaluation interval relative to symbol 

boundaries in the data stream in successive symbols, and can also be used to delay for 
the dead period. Eventually the moving evaluation interval straddles the boundary of the 
current symbol's guard Interval, and synchronization is then determined. The size of the 
evaluation interval is chosen to minimize the use of memory, yet to be large enough to 
10 achieve statistical significance in the evaluation Interval. The size of the evaluation 
interval, and the FIFO 77 may be statically or dynamically configured. 
Single Chip Implementation of a COFDM Demodulator 
Overview 

Referring initially to Fig. 12, there is shown a high level block diagram of a 

15 multicarrier digital receiver 126 in accordance with the invention. The embodiment 
described hereinbelow conforms to the ETS 300 744 telecommunications standard (2K 
mode), but can be adapted by those skilled in the art to operate with other standards 
without departing from the spirit of the invention. A radio frequency signal is received 
from a channel such as an antenna 128, into a tuner 130, which is conventional, and 

20 preferably has first and second intermediate frequency amplifiers. The output of the 
second intermediate frequency amplifier (not shown), is conducted on line 132 to an 
analog to digital converter 134. The digitized output of the analog to digital converter 
134 is provided to block 136 in which l/Q demodulation, FFT, channel estimation and 
correction, inner and outer deinterleaving, and forward error correction are conducted. 

25 Carrier and timing recovery are performed in block 1 36 entirely in the digital domain, and 
the only feedback to the tuner 1 30 is the automatic gain control ("AGC") signal which 
is provided on line 138. A steady 20 MHz clock on line 140 is provided for use as a 
sampling clock for the external analog to digital converter 134. A host microprocessor 
interface 142 can be either parallel or serial. The system has been arranged to operate 

30 with a minimum of host processor support. In particular channel acquisition can be 
achieved without any host processor intervention. 

The functions performed within the block 136 are grouped for convenience of 
presentation into a front end (Fig. 13), FFT and channel correction group (Fig. 14). and 
a back end (Fig. 15). 

35 As shown in Fig. 13, l/Q samples at are received by an IQ demodulator 144 from 

the analog to digital converter 1 34 (Fig. 12) on a bus 146 at a rate of 20 megasamples 
per second. An AGC circuit 148 also takes its input from the bus 146. A frequency rate 
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control loop is implemented using a numerically controlled oscillator 150, which receives 
frequency error signals on line 1 52, and frequency error update information on line 1 54. 
Frequency and sampling rate control are achieved in the frequency domain, based on 
the pilot carrier information. The frequency error signals, which are derived from the pilot 
5 carriers, and the frequency error update information will both be disclosed in further 
detail shortly. The I and Q data output from the IQ demodulator 144 are both passed 
through identical low pass filters 156, decimated to 10 megasamples per second, and 
provided to a sine interpolator 158. Sample rate control is achieved using a numerically 
controlled oscillator 160 which receives sample rate control information derived from the 
10 pilot signals on line 162, and receives sample error update timing information on line 
164. 

As shown in Fig. 14, acquisition and control of the FFT window are performed in 
block 166, which receives signals from the sine interpolator 158 (Fig. 13). The FFT 
computations are performed in FFT calculation circuitry 168. Channel estimation and 

15 correction are performed in channel estimation and correction block 170, and involves 
localization of the pilot carriers, as will be described below in greater detail. The tps 
information obtained during pilot localization is processed in tps sequence extract block 
172. Uncorrected pilot carriers are provided by the circuitry of channel estimation and 
correction block 170 to correction circuitry 174, which develops sampling rate error and 

20 frequency error signals that are fed back to the numerically controlled oscillators 150, 
160 (Fig. 13), 

Referring to Fig, 15, corrected 1 and Q data output from channel estimation and 
correction block 170 are provided to demapping circuitry 176. The current constellation 
and hierarchical constellation parameters, derived from the tps data, are also input on 

25 lines 178, 180. The resulting symbols are deinterleaved in symbol deinterleaver 182, 
utilizing a 1512x 13 memory store. One bit of each cell in the memory store is used to 
flag carriers having insufficient signal strength for reliable channel correction. Bit 
deinterieaver 184 then provides deinterieaved I and Q data to a Viterbi Decoder 186, 
which discards the flagged carriers, so that unreliable carriers do not influence traceback 

30 metrics. A Forney deinterleaver 188 accepts the output of the Viterbi Decoder 186 and 
is coupled to a Reed-Solomon decoder 190. The fon^/ard error correction provided by 
the Viterbi and Reed-Solomon decoders is relied upon to recover lost data in the case 
of flagged carriers. 

Referring to Fig. 16, in the presently preferred embodiment a mean value is 
35 calculated in block 192 for uncorrected carriers with reference to the previous symbol. 
Data carriers whose interpolated channel response falls below some fraction, preferably 
0.2, of this mean will be marked with a bad_carrier flag 194. The bad^carrier flag 194 
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is carried through the demapping circuitry 176, symbol deinterleaver 182, and bit 
deinterteaver 184, to the Viterbi Decoder 186 where it is used to discard data relating 
to the unreliable carriers. The parameters used to set the bad__carr!er flag 194 can be 
varied by the microprocessor interface 142. 
5 An output interface 196 produces an output which can be an MPEG-2 transport 

stream. The symbol deinterleaver 182, and the bit deinterleaver 184 are conventional. 
The Viterbi decoder 186, Forney deinterleaver 188, Reed-Solomon decoder 190, and 
the output interface 196 are conventional. They can be the components disclosed in 
copending Application No. 638,273, entitled "An Error Detection and Correction System 

10 for a Stream of Encoded Data", filed April 26, 1996, Application No. 480,976, entitled 
"Signal Processing System", filed June 7, 1995, and Application No. 481,107, entitled 
"Signal Processing Apparatus and Method", filed June 7, 1995. all of which are 
commonly assigned herewith, and are incorporated herein by reference. The operation 
of the multicarrierdigital receiver 126 (Fig. 12) is controlled by a system controller 198. 

1 5 Optionally the hierarchical constellation parameters can be programmed to speed 

up channel acquisition, rather than derived from the tps data. 

The input and output signals and the register map of the multicarrier digital 
receiver 126 are described in tables 4, and 5 respectively. 
Automatic Gain Control 

20 The purpose of the AGC circuit 148 (Fig. 1 3)is to generate a control signal to vary 

the gain of the COFDM input signal to the device before it is analog-to-digital converted. 
As shown in greater detail in Fig. 17, a Sigma-Delta modulator 200 is used to provide 
a signal which can be used as a gain control to a tuner, once it has been low-pass 
filtered by an external R-C network. 

25 The magnitude of the control voltage signal 202 is given by: 

control_voltage = control voltage - error (23) 
where - cr x , 

error = K(|data| - mean) (24) 

30 where K is a constant (normally K«1) which determines the gain in the AGC control 
loop. The mean value can be determined from the statistics of Gaussian noise, which 
is a close approximation to the properties of the COFDM input signal, where the input 
data is scaled to +/-1 . The control voltage signal 202 is set back to its initial value when 
the signal resync 204 is set low, indicating a channel change or some other event 

35 requiring resynchronization. 

The input and output signals and the registers for the microprocessorinterface 142 
of the AGC circuit 148 are described in tables 6. 7, and 8 respectively. 
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IQ Demodulator 

The function of the IQ demodulator 144 (Fig. 13) is to recover in-phase and 
quadrature components of the received sampled data. It is shown in further detail in Fig. 
18. 

5 The numerically controlled oscillator 150 generates in-phase and quadrature 

sinusoids at a rate of (32/7) MHz, which are multiplied with data samples in multipliers 
206. The address generator 208 advances the phase linearly. The frequency error input 
210 increments or decrements the phase advance value. The samples are multiplied 
with the sinusoids in the multipliers 206us!ng 10 bit x 10 bit multiply operations. In one 

10 embodiment the IQ demodulator 144 is operated at 20 MHZ and then retimed to 40MHz 
in retiming block 212. In a preferred embodiment the IQ demodulator 144 is operated 
at 40MHz, in which case the retiming block 212 is omitted. 

Sinusoids are generated by the address generator 208 on lines 214, 216. The 
phase value is employed as an address into a lookup table ROM 218. Only quarter 

15 cycles are stored in the lookup table ROM 218 to save area. Full cycles can be 
generated from the stored quarter cycles by manipulating the data from the ROM 218 
and inverting the data in the case of negative cycles. Two values are read from the 
lookup table ROM 218 for every input sample - a cosine and a sine, which differ in 
phase by 90 degrees. 

20 The input and output signals of the IQ demodulator 144 are described in tables 9 

and 10 respectively. 
Low Pass Filter 

The purpose of the low pass filters 156 (Fig. 13) is to remove aliased frequencies 
after IQ demodulation - frequencies above the 32/7 MHz second IF are suppressed by 

25 40dB. I and Q data are filtered separately. The output data is decimated to 10 
megasamples per second ("Msps") because the filter removes any frequencies above 
1/4 of the original 20 Msps sampling rate. The filter is constructed with approximately 
60 taps which are symmetrical about the center, allowing the filter structure to be 
optimized to reduce the number of multipliers 220. Fig. 1 9 is a block diagram of one of 

30 the low pass filters 156, the other being identical. Fig. 19 shows a representative 
symmetrical tap 222, and a center tap 224. The required filter response of the low pass 
filters 156 is shown in Fig. 20. 

The input and output signals of the low pass filters 156 are described in tables 1 1 
and 12 respectively. 

35 Resampling 

Referring to Fig. 13, the purpose of resampling is to reduce the 10 Msps data 
stream output from the low pass filters 156 down to a rate of (64/7) Msps, which is the 
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. nominal sample rate of the terrestrial digital video broadcasting f DVB-T") modulator at 
the transmitter. 

Resampling is accomplished in the sine interpolator 158, and the numerically 
controlled oscillator 160. The latter generates a nominal 64/7 MHZ- signal. The 
5 resampling circuitry is shown in further detail in Fig. 21. The numerically controlled 
oscillator 160 generates a valid pulse on line 226 and a signal 228 representing the 
interpolation distance for each 4GMHz clock cycle in which a 64/7MHz sample should 
be produced. The interpolation distance is used to select the appropriate set of 
interpolating filter coefficients which are stored in coefficient ROMs 230. It should be 
10 noted that only the sine interpolator for I data is illustrated in Fig. 21 . The structures for 
Q data are identical. 

Fig. 22 illustrates the generation of the interpolation distance and the valid pulse. 
Nominally T3 = 1/10 Msps. and T = 1/ (64/7) Msps. The sine interpolation circuit 
disclosed in our noted Application No. 08/638,273 is suitable, with appropriate 
1 5 adjustment of the operating frequencies. 

The input and output signals of the sine interpolator 158 and the numerically 
controlled oscillator 160 are described in tables 13 and 14 respectively. 
FFT Window 

As has been explained in detail above, the function of the FFT Window function 

20 is to locate the "active interval" of the COFDM symbol, as distinct from the "guard 
interval". This function is referred to herein for convenience as "FFT Window". In this 
embodiment the active interval contains the time domain representation of the 2048 
carriers which will be recovered by the FFT itself. 

The FFT window operates in two modes; Acquisition and Tracking. In Acquisition 

25 mode the entire incoming sample stream is searched for the guard interval/active 
interval boundary. This is indicated when the F-ratio reaches a peak, as discussed 
above. Once this boundary has been located, window timing is triggered and the 
incoming sample stream is searched again for the next guard interval/active interval 
boundary. When this has been located the length of the guard Interval is known and the 

30 expected position of the next guard/active boundary can be predicted. The FFT window 
function then switches to tracking mode. 

This embodiment is similar to the fourth alternate embodiment discussed above 
in respect of the tracking mode. In tracking mode only a small section of the incoming 
sample stream around the point where the guard/active boundary is expected to be is 

35 searched. The position of the active inten/al drifts slightly in response to IF frequency 
and sampling rate offsets in the front-end before the FFT is calculated. This drift is 
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tracked and FFT window timing corrected, the corrections being inserted only during the 
guard interval. 

It wilt be appreciated by those skilled in the art that in a practical single chip 
innplementation as is disclosed herein, memory is an expensive resource in terms of 
5 chip area, and therefore must be minimized. Referring to Fig. 23, during Acquisition 
mode the FFT calculation process is not active so hardware can be shared between the 
FFT Window and the FFT calculation, most notably a 1024x22 RAM 232 used as a 
FIFO by the FFT Window, and selected for receipt of FFT data on line 234 by a 
multiplexer 236. Once in Tracking mode the FFT calculation process is active so that 
10 other control loops to recover sampling rate and frequency which depend on FFT data 
(e.g. pilots in the COFDM symbol) can initialize. Therefore tracking mode requires a 
dedicated tracking FIFO 238, which is selected by a multiplexer 240. 

The input and output signals, and signals relating to the microprocessor interface 
142 of the FFT Window circuitry shown in Fig. 23 are described in tables 15, 16. and 17 
15 respectively. 

In one embodiment a threshold level, set from statistical considerations, is applied 
to the F-ratio signal (see Fig. 7) to detect the negative and positive spikes which occur 
at the start and end of the guard interval respectively. The distance between the spikes 
is used to estimate the guard interval size. Repeated detection of the positive spikes is 
20 used to confirm correct synchronization. However with this method under noisy 
conditions the F-ratio signal becomes noisy and the spikes are not always reliably 
detectable. 

In another embodiment peak detection is used to find the spikes in the F-ratios. 
It has been found that a fixed threshold is reliable only at or exceeding about a carrier- 
25 to-noise ("C/N") ratio of 12 dB. Peak detection is generally more sensitive and more 
specific, with generally reliable operation generally at 6 - 7 dB. The maxima should 
occur at the end of the guard interval. The difference in time between the two maxima 
is checked against the possible guard interval sizes. With an allowance for noise, the 
difference in time indicates the most likely guard inten/al size and the maxima 
30 themselves provide a good indication of the start of the active part of the symbol. 

Preferably this process is iterated for several symbols to confirm detection, and is 
expected to improve performance when the C/N ratio is low. 

The data stream is passed to accumulators 242, 244, each holding 64 moduli. 
Conversion to logarithms and subtraction of the logarithms is performed in block 246. 
35 The peaks are detected in peak detector block 248. Averaging of the symbol peaks is 
performed in block 250. 
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. In noisy conditions, tine maxima may be due to noise giving possibly inaccurate 
indications of the guard interval length and the start of the active symbol. The general 
strategy to cope with this is to perform a limited number of retries. 

Currently, calculation of the F-ratio is done "on the fly" i.e. only once at each point. 
5 The variance estimates are calculated from 64 values only. Under noisy conditions, the 
vahance estimates become very noisy and the spikes can become obscured. In an 
optional variation this problem is solved by obtaining more values for the variance 
estimate, by storing the variance estimate during acquisition for each of the possible 
"•"■^Gmax points in the storage block 256. The variance estimates themselves may be 

10 formed by accumulating variances for each point, and then filtering in time over a 
number of symbols. A moving average filter or an infinite impulse response ("IIR") filter 
is suitable. A moving run of symbols, preferably between 16 and 32, are integrated in 
block 252, which increases the reliability of peak detection under noisy conditions. The 
storage block 256 holding the integrated F-ratio values is searched to find the maximum 

15 value. This is of length T+G^a^. where G^^^ is the maximum guard interval size, T/4. 
Preferably the memory for storage block 256 is dynamically allocated, depending on 
whether acquisition mode or tracking mode is operative. Any unused memory is 
released to other processes. Similarly in tracking mode the integrated data stream is 
stored in tracking integration buffer 254. 

20 This method has been tested with up to 4 symbols, without an IIR filter, and it has 

been found that the spikes can be recovered. However this approach does require 
increased memory. 
FFT Processor 

The discrete Fourier transform ("DFT") has the well known formula 



25 



1 

x(k) = - 5;x(n)W"'^ k = 0,1 N-1 (25) 

L n=0 



where N = the number of points in the DFT; 
x(k) = the kth output in the frequency domain; 
30 x(n) = the nth input in the time domain 



and 



W = e -if2nnk/L) J26) 

W is also known as a "twiddle factor". 
35 For N > 1000 the DFT imposes a heavy computational burden and becomes 

impractical, instead the continuous Fourier transform is used, given by 
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x(t) = I xCOe-^'^^dt (27) 

5 The continuous Fourier transform, when computed according to the well known FFT 
algorithm, breaks the original N-point sequence into two shorter sequences. In the 
present invention the FFT is implemented using the basic butterfly unit 258 as shown 
in Fig. 24. The outputs C and D represent equations of the form C = A + and D = (A - 
B)W*'. The butterfly unit 258 exploits the fact that the powers of W are really just 
10 complex additions or subtractions. 

A real-time FFT processor, realized as the FFT calculation circuitry 168 (Fig. 14) 
is a key component in the implementation of the multicarrier digital receiver 126 (Fig. 
12). Known 8K pipeline FFT chips have been implemented with 1.5M transistors, 
requiring an area of 100 mm^ in 0.5m technology, based on the architecture of Bi and 
15 Jones. Even using a memory implementation with 3-transistor digital delay line 
techniques, over 1M transistors are needed. This has been further reduced with 
alternative architecture to 0.6M, as reported in the document A New Approach to 
Pipeline FFT Processor Shousheng He and Mats Torkelson, Teracom Svensk 
RundRadio. DTTV-SA 180, TM 1547. This document proposes a hardware-oriented 
20 radix-2^ algorithm, having radix-4 multiplicative complexity. However the requirements 
of the FFT computation in the present invention require the implementation of a radix 
2^+2 FFT processor. 

Referring to Fig. 25 and Fig. 26 the butterfly structures BF2I 260 and BF2I! 262. 
known from the noted Torkelson publication, are shown. The butterfly structure BF21I 
25 262 differs from the butterfly structure BF2I 260 in that it has logic 264 and has a 
crossover 266 for crossing the real and imaginary inputs to facilitate multiplication by -j. 

Fig. 27 illustrates the retimed architecture of a radix 2^ + 2 FFT processor 268 in 
accordance with the invention, which is fully pipelined, and comprises a plurality of 
stages, stage-0 270 through stage-6 272. Except for stage-0 270, the stages each 
30 comprise one butterfly structure BF21 260 and one butterfly structure BF2II 262, and 
storage RAMS 274, 276 associated therewith, stage-0 270 only has a single butterfly 
structure BF2I 260. This architecture performs a straight-fonA/ard 32-point FFT. stage-6 
272 has control logic associated therewith, including demultiplexer 278 and multiplexer 
280, allowing stage-6 272 to be bypassed, thus providing a 2K implementation of the 
35 FFT. Counters 282 configure the butterfly structures BF21 260 and BF2I! 262 to select 
one of the two possible diagonal computations, during which data is being simulta- 
neously written to and read from the storage RAMS 274. 276. 
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Fig. 28 illustrates a 32 point flow graph of the FFT processor 268 using radix 2^+2 
pipeline architecture. Computations are performed using eight 4-point FFTs and four 8- 
point FFTs. These are decomposed in turn into two 4-point FFTs and four 2-point FFTs. 
Fig. 29 illustrates the retimed architecture of a configurable 2K/8K radix 2^+2 
5 single path, delay feedback pipelined FFT processor 284, in which like elements in Fig. 
27 are given the same reference numerals. The stages have a plurality of pipeline 
registers 286 which are required for proper timing of the butterfly structures BF2I 260 
and BF2II 262 in the various stages. As can be seen, the addition of each pipelined 
stage multiplies the range of the FFT by a factor of 4. There are 6 complex multipliers 

10 288. 290. 292. 294. 296, 298 which operate in parallel. This processor computes one 
pair of l/Q data points every four fast clock cycles, which is equivalent to the sample rate 
clock. Using O.SSpm technology the worst case throughput is 140ms for the 2K mode of 
operation, and 550|js for the 8K mode, exceeding the requirements of the ETS 300 744 
telecommunicationsstandard. Data enters the pipeline from the left side of Fig. 29, and 

15 emerges on the right. The intermediate storage requirements are 2K/8K for I data and 
2K/8K for Q data, and is mode dependent. In practice the radix-4 stage is implemented 
as a cascade of two adapted radix-2 stages that exploit the radix-4 algorithms to reduce 
the number of required complex multipliers. 

Fig. 30 is a schematic of one embodiment of the multipliers 288, 290, 292. 294, 

20 296, 298 for performing the complex multiplication C = A x B, where A is data, and B is 
a coefficient. Because the FFT processor 284 has 6 complex multipliers, each requiring 
3 hardware multipliers 300, a total of 18 hardware multipliers 300 would be required. It 
is preferable to use the embodiment of Fig. 31 in which some of the hardware multipliers 
300 are replaced by multiplexers 302, 304. 

25 Turning again to Fig. 29 there are a plurality of RAMS 306, 308, 310, 312, 314, 

316 which are preferably realized as ROMs and contain lookup tables containing 
complex coefficients comprising cosines for the multipliers 288, 290, 292. 294, 296, 298 
respectively. It has been discovered that by addressing the RAMS 306. 308, 310. 312. 
314, 316 according to a particular addressing scheme, the size of these RAMS can be 

30 markedly reduced. The tradeoff between the complexity of the addressing circuitry and 
the reduction in RAM size becomes favorable beginning at stage-3 318. Referring again 
to Fig. 28 there are two columns 320. 322. Column 320 holds values - W^", followed 
by W - and then - \N^\ These coefficients are stored in the RAM 308. required 
by the particular multiplier 290. Column 322 contains values W^. W*. W^^ ^^ich repeat 

35 3 times. Note further that between the values W®, W^. and W, W^^are connections 324, 
326 to the preceding butterfly unit located in column 328. In practice the connections 
324, 325 are implemented as multiplications by W°. In moving from multiplier to 
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multiplier toward the left in Fig. 29, the lookup table space is multiplied by a power of 4 
at each stage. In Fig. 32 table 330, the lookup table for multiplier contains 512 
entries. It can be deduced by extrapolation that multiplier must contain 8192 twiddle 
factors, and corresponds to the size of the FFT being performed by the FFT processor 
284 (Fig. 29). 

Before examining the look-up table space in more detail it is helpful to considerthe 
plurality of horizontal lines 332. Moving downward from the top of Fig. 28. the line 
beginning at x(3) extends to W®, which is the first twiddle factor required, and is at the 
third effective step in the flow diagram. Figs. 33 and 32 show the organization of the 
twiddle factors for each of the multipliers, wherein the terminology represents the 
multiplier associated with the kth stage. Thus table 334 relates to multiplier Mq. The 
notation for the W values (twiddle factors) is shown in box 336. The subscript "B" at the 
bottom right represents a time stamp, that is an order dependency in which the twiddle 
factors are required by the pipeline. The superscript "A" represents the address of the 
twiddle factor in its lookup table. The superscript "N" is the index of the twiddle factor. 

Thus in table 334 it may be seen that W° is required at time 0, W at time 1 , and 
W° is again required at time 2. Further inspection of the other tables in Figs. 33, 32 
reveals that half of the entries in each table are redundant. The storage requirementfor 
the lookup tables can be decreased by 50% by eliminating redundant entries. This has 
been accomplished by organizing the W values in ascending order by index, so that the 
values can be stored in memory in ascending order. Thus in the case of table 338 the 
index values range from 0 to 21, with gaps at 11, 13, 16. 17, 19, and 20. 

The procedure for organizing the lookup table and the addressing scheme for 
accessing the twiddle factors is explained with reference to table 338. but is applicable 
to the other tables in Fig. 33. (1) Each row is assigned a line number as illustrated. (2) 
Each twiddle factor is assigned an order dependency which is noted in the lower right 
of its respective cell in table 338. (3) It is assumed that table 338 in its reduced form will 
contain only unique twiddle factors in ascending order by index within the memory 
address space. Consequently each twiddle factor is assigned a memory address as 
shown in the upper left of its respective cell. 

During address generation, for line 3 of table 338 the address is simply held at 0. 
For line 1 the address is incremented by 1 to the end of the line. However lines 0 and 
2 contain non-trivial address sequences. For line 0, looking at table 340, which contains 
64 values, it will be observed that the address sequence changes according to the 
intervals 2.2,2.2. and then later 1 .1 ,2.1.1 .2 ... For line 2. the address first increments by 
3. then by 2. and finally by 1 . The locations at which the address increments change are 



wo 98/19410 

PCT/US97/18911 

32 

referred to herein as the "break-points". These values of the break points range between 
0. corresponding to the first point in line 2. to the last position in the line. 

By inspection it can be seen that the occurrence of the first break point changes 
from table to table following the recurrence relationship 

5 

S^M, = 4B1„^ (28) 

with the initial condition 

^^M, = ^ (29) 
10 where M^, is the multiplier of the Nth stage of the FFT processor 284. 

Expanding the recurrence relationship gives: 

B1„^ = (((4B1„^-1)x4-1)x4-1) ... (30) 



15 



30 



B1m 



. = 4-B1^^-4--3-4'^-^..-4° (31) 



N -1 



^^M, = 4-^61,^ -E 4" (32) 
20 Similarly the second break point B2 for line 2 is determined from the recurrence relation 



S2m. = 4B2„^_, . 1 (33, 



with the initial condition 



25 ^^Mo = 1 (34) 

or 

B2m^ = (((4B2„^-Hl)x4-Hl)x4^1) ... (35) 



B2 



= E 4" (36) 



n=0 



Break point B3 for line 0 at which the sequence changes from increments of 
2.2,2.2 to the pattern 1.1.2,1.1.2. . . can be located by inspecting tables 338. 340. and 
330. In table 338 the break point B3 occurs very late in the line, such that the second 
35 sequence only presents its first two elements. By examining the address locations in the 
larger noted tables, it can be deduced that the location of break point B3 is related to 
the number of entries in a particular table as 
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B3 = — + 2 (37) 
4 

where K is the number of table entries. In the tables in Fig. 29 K = 8, 32, 128, 2048. 
5 8192. Therefore, in terms of the N'th complex multiplier, break point B3 can be 
expressed as 

B3„^ = 2 X 4*^ + 2 (38) 

where N > 0. 

10 Address generators 342. 344, 346, 348 are operative for the lookup tables in 

RAMS 310, 312, 314, 315. Silicon area savings for the smaller tables 308, 306 are too 
small to make this scheme worthwhile. 

Fig. 34 schematically illustrates an address generator 342 for the above described 
address generation scheme, and is specific for the table 340 and multiplier M2. 128 

15 possible input states are accepted in lines in_Addr 350, and a multiplexer 352 selects 
the two most significant bits to decode 1 of 4 values. The output of the multiplexer 352 
relates to the line number of the input state. Actually the output is the address increment 
applicable to the line number of the input state, and is used to control a counter 354 
whose incremental address changes according to value on line 356. Thus, the 

20 increment for line 3 of table 340 is provided to the multiplexer 352 on line 358, and has 
a value of zero, as was explained above. Similarly the increment for line 1 of table 340 
is provided to the multiplexer 352 on line 360, and has a value of 1. 

The situations of line 0 and line 2 are more complicated. For line 0 the output of 
decoding iogic 362 is provided by multiplexer 364. and has either an incremental value 

25 of 2, or the output of multiplexer 366. The latter could be either 1 or 2, depending on the 
state of a two bit counter 368, which feeds back a value of 0 or 1 as signal count 370. 

Decoding logic 372 decodes the states for line 2 of table 340. The relationship of 
the current input state to the two break points of line 2 are tested by comparators 374, 
376. The break point is actually set one sample earlier than the comparator output to 

30 allow for retiming. The outputs of the comparators 374. 376 are selectors for the 
multiplexers 378. 380 respectively. 

The current address, held in accumulator 382 is incremented by the output of the 
multiplexer 352 by the adder 384. A simple logic circuit 386 resets the outgoing address, 
which is contained in register ACC 388, by asserting the signal rst 390 upon completion 

35 of each line of table 340. This insures that at the start of the next line the address points 
to twiddle factor W^. The new address is output on the 6 bit bus out_Address 392, which 
is one bit smaller than the input in_Addr 350. 
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Fig. 35 is a generalization of address generator 342 (Fig. 34), in which the 
incoming address has a path of B bits. Like elements in Figs. 34 and 35 are given the 
same reference numerals. The structure of address generator 394 is similar to that of 
the address generator 342, except now the various lines of the input in^addr 396 and 
5 the output out_addr[B-2:0] 398 are denoted in terms of B. Thus the multiplexer 352 in 
Fig. 35 is selected by input in^addr [B-1:B-2] 400 . Similarly one of the inputs of 
comparator 374 and of comparator 376 is in_addr [B-3:0] 402. Out_addr[B-2:0] 398 
forms the output. The advantage of this structure is a reduction in the size of the lookup 
table RAM of 50%. 

10 The FFT calculation circuitry 168 (Fig. 14) is disclosed in Verilog code listings 1 - 

17. The Verilog code for the address generator 394 is generic, enabling any power-of- 
four table to be implemented. 
Channel Estimation and Correction 

The function of the Channel estimation and correction circuitry shown in channel 

15 estimation and correction block 170 (Fig. 14) is to estimate the frequency response of 
the channel based on the received values of the continuous and scattered pilots 
specified in the ETS 300 744 telecommunicationsstandard. and generate compensation 
coefficients which correct for the channel effects and thus reconstruct the transmitted 
spectrum. A more detailed block diagram of the channel estimation and correction block 

20 170 is shown in Fig. 16. 

In acquisition mode, the channel estimation and correction block 170 needs to 
locate the pilots before any channel estimation can take place. The circuitry performs 
a convolution across the 2048 carriers to locate the positions of the scattered pilots, 
which are always evenly spaced, 12 carriers apart. Having found the scattered pilots. 

25 the continual pilots can be located; once this is done the exact position of the 1705 
active carriers within the 2048 outputs of the FFT calculation circuitry 168 (Fig. 14) is 
known. A timing generator 404 within the block can then be initialized, which then 
generates reference timing pulses to locate pilots for channel estimation calculation and 
for use in other functions of the demodulator as well. 

30 Channel estimation is performed by using the evenly spaced scattered pilots, and 

then interpolating between them to generate the frequency response of the channel. 
The received carriers (pilots and data) are complex divided by the interpolated channel 
response to produced a corrected spectrum. A complete symbol is held in a buffer 406. 
This corrects for the bit-reversed order of the data received from the FFT calculation 

35 circuitry 168. It should be noted that raw. uncorrected data is required by the frequency 
and sampling rate error circuitry. 
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The task of synchronizing to the OFDM synnbol in the frequency donnain data 
received from the FFT calculation circuitry 168 (Fig. 14) begins with the localization of 
the scattered and continual pilots, which occurs in pilot locate block 408. Scattered 
pilots, which according to the ETS 300 744 telecommunications standard, occur every 
5 12 data samples, offset by 3 samples with respect to the start of the frame in each 
succeeding frame. As the power of the pilot carriers is 4/3 the maximum power of any 
data carrier, a succession of correlations are performed using sets of carriers spaced 
at intervals of 12. One of the 12 possible sets is correlates highly with the boosted pilot 
carrier power. 

10 A first embodiment of the pilot search procedure is now disclosed with reference 

to Figs. 36 and 16. It should be noted that the scattered pilot search procedure is done 
on the fly, and storage is only required in so far as is necessary to perform the 
subsequent step of continual pilot location discussed below. At step 410, after the 
assertion of the signal resync 204. generally occurring after a channel change or on 

15 power up, the signal pilotJock412 is set low. Then, at step 414 the process awaits the 
first symbol pulse from the FFT calculation circuitr/ 168 (Fig. 14) on line 416 indicating 
the start of the first symbol. The first symbol is received and stored. In one embodiment 
of the pilot search procedure each point from 0 to 2047 is read in turn, accumulating 
each value (Ih + |Q1) in one of 12 accumulators (not shown). The accumulators are 

20 selected in turn in a cycle of 12, thus convolving possible scattered pilot positions. Two 
well known peak trackers indicate the accumulator with highest value (Peaki) and the 
accumulator having the second highest value (Peak2). The accumulator having the 
highest value corresponds to the scattered pilot orientation. The second highest value 
is tracked so that the difference between the highest peak and the second highest peak 

25 can be used as a "quality" measure. At decision step 418, if the two peaks are not far 
enough apart, a test for completion of a full range frequency sweep is made at decision 
step 420. If the test fails, failure of the scattered pilot search is reported at step 422. 
Otherwise, at step 424 the IQ Demodulator LO frequency is incremented by +1/8 carrier 
spacing by incrementing the magnitude of the control signal freq_sweep 426. Then the 

30 search for scattered pilots is repeated after delaying 3 symbols at step 428 to allow time 
for the effect of the change to propagate through the FFT calculation circuitry 168 and 
buffers. The peak difference threshold can be altered by the control microprocessor via 
the microprocessor interface 142 and block 430. 

In a variation of the first embodiment there is only a single peak tracker which 

35 indicates the accumulator with highest value, which corresponds to the scattered pilot 
orientation. The true scattered pilot orientation thus found is one of 12 possible 
orientations. 
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If the test at decision step 418 is successful, the search for continual pilots is 
begun at step 432 by establishing an initial pilot offset from the 0 location in the RAM, 
stonng the FFT data, according to the formula 

pilot offset = (accumulator # mod 3) (39) 

5 

Thus, if the scattered pilot peak is in accumulator 0, 3, 6 or 9 the pilot offset is 0. If the 
scattered pilot peak is in accumulator 1, 4, 7, or 10 then pilot offset is 1, etc. Then 45 
carrier positions expected for continual pilots are read, adding the pilot offset value to 
the address, and accumulating (|l| + |qi) values. This procedure is repeated until first 

10 115 continual pilot start positions have been searched. From the ETS 300 744 tele- 
communications standard the number of possible first carrier positions among the active 
carriers lying in a contiguous block between carrier 0 and carrier 2047 is easily 
calculated as (2048-1705) / 3 = 1 1 5, as explained below. It is thus guaranteed that the 
active interval begins within the first (2048-1705) carrier positions. The carrier 

15 corresponding to the peak value stored is the first active carrier in the symbol. 

Upon completion of the continual pilot search, at step 434 the timing generator404 
is reset to synchronize to the first active carrier and scattered pilot phase. The signal 
pilotjock412 is then set high at step 436, indicating that the pilots have been located 
successfully, then at step 436 the timing generator 404 is reset to synchronize to the 

20 first active carrier and scattered pilot phase. 

In a tracking mode of operation, shown as step 438, the scattered pilot search is 
repeated periodically, and evaluated at decision step 440. This can be done at each 
symbol, or less frequently, depending upon propagation conditions. The predicted 
movement of the scattered pilot correlation peak is reflected by appropriate timing in the 

25 timing generator404, and can be used as a test that timing has remained synchronized. 
Failure of the test at decision step 440 is reported at step 442, and the signal pilotjock 
412 is set low. 

A second embodiment of the pilot search procedure is now disclosed with 
reference to Figs. 16 and 37. At step 444 the assertion of the signal resync 204, 

30 generally occurring after a channel change or on power up, the signal pilotjock 412 is 
set low. Then, at step 446 a symbol is accepted for evaluation. A search for scattered 
pilots, conducted according to any of the procedures explained above, is performed at 
step 448. Then a search for continual pilots is performed as described above at step 
450. At decision step 452 it is determined whether two symbols have been processed. 

35 If the test fails, control returns to step 446 and another symbol is processed. If the test 
succeeds at step 454 another test is made for consistency in the positions of the 
scattered and continual pilots in the two symbols. If the test at step 454 fails, then the 
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procedure beginning with decision step 420 is performed in the same manner as 
previously described with reference to Fig. 36. If the test at step 454 succeeds at step 
456 the timing generator 404 is reset to synchronize to the first active, carrier and 
scattered pilot phase. The signal pilot Jock 412 is then set high at step 458, indicating 
5 that the pilots have been located successfully. 

In a tracking mode of operation, shown as step 460, the scattered pilot search is 
repeated periodically, and evaluated at decision step 462. This can be done at each 
cycle of operation, or less frequently, depending upon propagation conditions. The 
predicted movement of the scattered pilot correlation peak is reflected by appropriate 

10 timing in the timing generator 404, and can be used as a test that timing has remained 
synchronized. Failure of the test at decision step 462 is reported at step 464, and the 
signal pilot Jock 412 is set low. 

It will be appreciated that after the scattered pilots have been located, the task of 
locating the continual pilots is simplified considerably. As the continual pilots are 

15 inserted at a known sequence of positions, the first of which is offset by a multiple of 3 
positions with respect to start of the frame, as specified by the ETS 300 744 telecommu- 
nications standard. Two of three possible location sets in the data space can therefore 
be immediately excluded, and it is only necessar/ to search the third set. Accordingly 
the continual pilot search is repeated, each iteration beginning at a location 3 carriers 

20 higher. New accumulated values and the current start location are stored if they are 
larger than the previous accumulated value. This is repeated until all continual pilot start 
positions have been searched. The carrier corresponding to the largest peak value 
stored will be the first active carrier in the symbol. It is unnecessary to evaluate the 
"quality" of the continual pilot correlation peak. The scattered pilot search represents a 

25 correlation of 142 samples, and has higher noise immunity that of the search for 45 
continual pilots. The continual pilot search is almost certain to be succeed if scattered 
pilot search completed successfully. 

The above sequences locate scattered pilot positions within 1/4 symbol period, 
assuming accumulation at 40MHz, and locate continual pilots in less than 1 symbol 

30 period (45 x 1 15 clock cycles assuming 40MHz operation). 

The 1 and Q data is provided to the pilot locate block 408 by the FFT calculation 
circuitry 168 (Fig. 14) in bit-reversed order on line 416. This complicates the problem of 
utilizing a minimum amount of RAM while computing the correlations during pilot 
localization. Incoming addresses are therefore bit reversed, and computed modulo 12 

35 in order to determine which of 1 2 possible bins is to store the data. In order to avoid the 
square root function needed to approximate the carrier amplitude, the absolute values 
of the data are summed instead as a practical approximation. The scattered pilots are 
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determined "on the fly". The continual pilots are located on frames which succeed the 
frames in which the scattered pilots were located. 

The operation of the timing generator 404 is now disclosed in further detail. The 
addressing sequence for the RAM buffer 406 is synchronized by a symbol pulse from 
5 the FFT calculation circuitry 168 (Fig. 14). The FFT calculation process runs continu- 
ously once the first symbol from has been received following FFT Window acquisition. 
Addressing alternates between bit-reversed and linear addressing for successive 
symbols. The tirning generator 404 also generates all read-write timing pulses. 

Signals u_symbol466 and c_symbol468 are symbol timing pulses indicating the 

10 start of a new uncorrected symbol or corrected symbol. The signal u_symbol 466 is 
delayed by latency of the interpolating filter 470 and the complex multiplier 472, which 
are synchronized to RAM Address Sequence Timing. 

For carrier timing the signals c_carrierO 474. pilot timing signals us_pilot(+) 476. 
uc_pilot(+) 478, c_tps_pilot(*) 480 and odd_symbol pulse 482 are referenced to a 

15 common start pulse sequence. A base timing counter (not shown) is synchronized by 
the pilot locate sync timing pulse 484, and is therefore offset from symbol timing. Pilot 
timing outputs are also synchronized to uncorrected symbol output from the buffer 406 
or the corrected symbol output delayed by the interpolating filter 470 and the complex 
multiplier 472. On assertion of the signal resync 204 all timing output is set to inactive 

20 states until the first symbol is received. Let the transmitted pilot at carrier k be P„ and 
the received pilot be P',,. 

= H, • w, • P, (40) 

where P^ is described below, and 



25 



PV = K ^ JQr (41) 



where k indexes pilot carriers, H,^ is the channel response and w,, is the reference 
sequence. We interpolate to generate compensation values for the received data 
30 carriers. D'^: 

DK='.-jQ. (42) 

= — (43) 

35 ^ H, 

where k indexes data carriers. Received pilots can be demodulated using a locally 
generated reference sequence and are then passed to the interpolating filter. 
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The interpolating filter 470, realized in this embodinnent with 6 taps and 12 
coefficients, is utilized to estimate the portion of the channel between the scattered 
pilots. As explained above pilots are transmitted at known power levels relative to the 
data carriers and are modulated by a known reference sequence according to the ETS 
5 300 744 telecommunicationsstandard. The transmitted pilot carrier amplitudes are ± 4/3 
of nominal data carrier power (+4/3 for reference bit of 1 . -4/3 for the reference bit of 0; 
quadrature component = 0 in both cases). Interpolation coefficients are selected from 
the 0-11 cyclic count in the timing generator 404 synchronized to data availability. 
Appropriate correction factors may be selected for data points to provide on-the-fly 
1 0 correction. The coefficients vary depending on scattered pilot phase. Since the positions 
of reference pilots vary, therefore coefficients to compensate a given data carrier also 
vary. 

The input and output signals, and signals relating to the microprocessor interface 
142 of the channel estimation and correction block 170 are described in tables 18, 19 

15 and 20 respectively. The circuitry of the channel estimation and correction block 170 is 
disclosed in Verilog code listings 18 and 19. 
TPS Sequence Extract 

The tps sequence extract block 172 (Fig. 14), although set out as a separate block 
forclarity of presentation's in actuality partially included in the channel estimation and 

20 correction block 170. It recovers the 68-bit TPS data carried in a 68-symbol OFDM 
frame, and is shown in further detail in Fig. 38. Each bit is repeated on 17 differential 
binary phase shift keyed ("DBPSK") modulated carriers, the tps pilots, within a COFDM 
symbol to provide a highly robust transport channel. The 68-bit tps sequence includes 
14 parity bits generated by a BCH code, which is specified in the ETS 300 744 

25 telecommunications standard. Of course appropriate modifications can be made by 
those skilled in the art for other standards having different BCH encoding, and for 
modes other than 2K mode. 

A clipper 486 clips incoming corrected spectrum data to ±1. The sign bit can be 
optionally evaluated to obtain the clipped result. In comparison block 488 clipped 

30 received tps pilot symbols are compared against a reference sequence input. In the 
described embodiment a value of 0 in the reference sequence matches -1 in the pilot, 
and a value of 1 in the reference sequence matches +1 in the pilot. Majority vote 
comparisons are used to provide an overall +1 or -1 result . A result of +1 implies the 
same modulation as the reference sequence, and a result of -1 implies inverse 

35 modulation. 

The DBPSK demodulator 490 converts the +/-1 sequence from the majority vote 
form to a binary form. The sequence converts to a value of 0 if the modulation in current 
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and previous symbols was. the same, and to 1 if modulation between successive 
symbols is inverted. 

From an uninitialized condition a search for either of two sync words in 68-bit tps 
sequence (4 x 68-bit = 1 superframe) is conducted in the frame synchronizerblock 492. 
5 The synchronization words of a superframe are as follows: 

0011010111101110 sync word for frames 1 and 3 

1100101000010001 sync word for frames 2 and 4 

Having acquired either sync word, a search for the other is conducted in the appropriate 
position in the next OFDM frame. On finding the second sync word synchronization is 
10 declared by raising the signal tps_sync 494. Data is then passed to the BCH decoder 
496. which operates on 14 parity bits at the end of an OFDM frame against received 
data in the frame. Errors are corrected as necessary. 

Decoded data is provided to output store block 498. which stores tps data that is 
found in a full OFDM frame. The output store block 498 is updated only at the end of an 
1 5 OFDM frame. Only 30 bits of interest are made available. Presently some of these bits 
are reserved for future use. The length indicator is not retained. 

The BCH decoder 496 has been implemented in a manner that avoids the 
necessity of performing the Berlekamp Algorithm and Chien Search which are 
conventional in BCH decoding. The Galois Field Multiplier used in the BCH decoder 496 
20 is an improvement of the Galois Field Multiplierwhich is disclosed in our copending U.S. 
Application No. 08/801,544. 

The particular BCH code protecting the tps sequence rs specified in the ETS 300 
744 telecommunications standard as BCH (67,53, t=2), having a code generator 
polynomial 

25 

h(x) = x'^+x^+x^+x^+x^+x^+x^+x + l (44) 

or equivalently 

h(x) = (x^+x^ + l) (x^+x^+x^+x^l) (45) 

30 The left factor is used to generate the Gaiois Field which is needed for error detection. 
Referring to Fig. 39, this is calculated in syndrome calculation block 500 which can be 
implemented using a conventional feedback shift register to generate the a values. The 
first three syndromes are then computed by dividing the received signal R(x) by the 
values a \ a', and a^. again using a conventional feedback shift register implementa- 

35 tion, as is well known in the art of BCH decoding. It can be shown that the syndromes 
are 
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So = ia'f' ^ icx'f' (46) 

S, = (aV° ^ (a^)'^ (47) 

S2 = (aV ^ (o(')^^ (48) 



During the syndrome computation the syndromes are stored in storage registers 
R[2:0] 502. 

In the event Sq is 0, then it can be immediately concluded that there are no errors 
10 in the current tps sequence, and a signal is asserted on line 504 which is provided to 
error detect block 506, and the data of the received signal R(x) either output unchanged 
or toggled according to the output of the error detect block 506 on line 508. As 
explained below, if 

-,5 S, O So = S2 (49) 

then exactly one error is present, a condition which is communicated to the error detect 
block 506 on line 510. Otherwise it is assumed that two errors are present. More than 
two errors cannot be detected in the present implementation. 

In order to solve the system of three non-linear equations shown above, data flow 

20 from the registers R[2:0] 502 into search block 512 is enabled by a signal EOF 514, 
indicating the end of a frame. Three feedback shift registers 516, 518. 520 having 
respective Galois Field multipliers 522, 524, 526 for a'^ - a'^ in the feedback loop are 
initialized to 50H. 20H. and 3dH (wherein the notation "H" refers to hexadecimal 
numbers). The feedback shift registers 516, 518, 520 are clocked each time a new data 

25 bit is available. The syndromes and outputsof the feedback shift registers 516, 518, 520 
are clocked into to a search module, which performs a search for the error positions 
using an iterative substitution search technique, which will now be described. The 
outputs of feedback shift registers 516, 518 are multiplied in a Galois Field Multiplier 
528. 

30 Considering the case of one error, Sq is added, modulo 2, preferably using a 

network of XOR gates 530, to the output of the first feedback shift register 516 (a-geno). 
If the relationship 

(So^ctg^n,) = 0 (50) 

35 holds, it is concluded that there is an error in the present data bit. The bit being currently 
output from the frame store is toggled. The search is halted, and the data is output from 
the frame store. 
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Considering the case of tyvo errors, if the following relationship holds, there is an 
error in the current bit being output from the frame store: 

(So * «gen,) © (S , - O^en,) = (S, . a^^^J (51 ) . 

5 It is now necessary to store the three terms calculated in the immediately preceding 
equation into the registers R[2:0] 502 which previously stored the syndromes Sq - S2. 
This is represented by line 532. 

The process continues, now looking for the second error, and reusing the data in 
registers R[2:0] 502. which now contains the syndromes as adjusted by the previous 
10 iteration. The adjusted syndromes are denoted Sq* - S2'. 

^0=(^0*^gen,) .©tC. (52) 

Now, if 



15 



(^O^^genJ = 0 (53, 

the second error has been found, and the bit being currently output from the frame store 
is toggled by XOR gate 534. If the search fails, more than two errors may be present 
and an error signal (not shown) is set. 

the Galois Field Multiplier 528 is a clocked digital circuit and is disclosed with 

20 reference to Fig. 40. The tps data is received very slowly, relative to the other processes 
occurring in the multicamer digital receiver 126. It is thus possible to execute the 
iterative substitution search slowly, and the Galois Field Multipliers are designed for 
minimum space utilization. They do not require alpha generators, but rely on small 
constant coefficient multipliers, with iterative feedback to produce the required alpha 

25 values. The arrangement takes advantage of the relationship in Galois Field arithmetic 



a" = • a""^ (54) 

After initialization by a signal init 536 which selects multiplexers 538, 540, the 

multiplicand A 542 is accumulated in register 544 and repeatedly multiplied by the value 
30 aMn multiplier 546. The output on line 548 is repeatedly ANDed bitwise with the 

multiplicand B held in a shift register 550. The output of the shift register is provided on 

a one bit line 552 to the gate 554. The output of the gate 554 is accumulated in register 

556 using the adder 558. 

The input and output signals and signals relating to the microprocessor interface 
35 142 of the tps sequence extract block 172 are described in tables 21, 22, and 23. 

Circuitry of the tps sequence extract block 172 and the BCH decoder 496 is disclosed 

in Verilog code listings 20 and 21. 
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Automatic Fine Frequency Control and Automatic Sampling Rate Control 

A non ideal oscillator present in the transmission chain of an orthogonal frequency 
division multiplexed ("OFDM") signal affects all carriers in the OFDM symbols. The 
OFDM carriers adopt the same phase and frequency disturbances resulting from the 
noisy local oscillator. Variations in the frequency of the Local Oscillator lead to phase 
shifts, and consequent loss of orthogonality within the OFDM symbol. Therefore 
competent automatic frequency control is required in the receiver to track the frequency 
offsets relative to the transmitter in order to minimize these phase shifts and hence 
maintain orthogonality. 

All the carriers within an OFDM symbol are equally affected by the phase shifts. 
This is similar to the common phase error caused by phase noise. The common phase 
error present on all carriers is used to generate an Automatic Frequency Control ("AFC") 
signal, which is completely in the digital domain, since l/Q demodulation is performed 
in the digital domain. The approach taken is the calculation of the common phase error 
for every OFDM symbol. This is achieved by using the reference pilots. The change in 
the common phase error is measured overtime to detect a frequency offset and is used 
to derive the AFC control signal. The generic approach for the AFC control loop and the 
automatic sampling rate control loop disclosed below is illustrated in Fig. 41. 

Automatic sampling rate control is required when the receiver*s master clock is not 
aligned with that of the transmitter. The misalignment causes two problems: (1) the 
demodulating carriers have incorrect spacing; and (2) the interval of the FFT calculation 
is also wrong. 

The effect of this timing error is to introduce a phase slope onto the demodulated 
OFDM data. This phase slope is proportional to the timing error. The phase slope can 
be determined by calculating the phase difference between successive OFDM symbols, 
using reference pilots, and estimating the slope of these phase differences. A least 
squares approach is used for line fitting. The ASC signal is low-pass filtered and fed 
back to the sine interpolator 158 (Fig. 13). 

The mean phase difference between the reference pilots in subsequent OFDM 
symbols is used to calculate the frequency deviation. Assuming that the frequency 
deviations of the local oscillator are constant, then the phase rotates with a, where 
a = 2TTf^mTt rads. Here f^ is frequency deviation, m is the number of symbols between 
repetitions of identical pilot positions, and T^ is the period comprising the sum of the 
active interval and the guard inten/al. The AFC signal is generated over time by low 
pass filtering a. The value of the frequency deviation is then used to control the 10 
demodulator 144 (Fig. 13). 
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The AFC and ASC control signals are effective only when a guard inten/al is 
passing indicated by the assertion of signal IQGI on line 154 (Fig. 13). This prevents a 
symbol from being processed under two different conditions. 

The correction circuitry 174 (Fig. 14) is shown in greater detail in Fig. 42. 
Frequency error values output on line 560 are calculated by determining the average 
of the differences of phase values of corresponding pilots in a current symbol and the 
previous symbol. The resulting frequency error value is filtered In low pass filter 562 
before being fed-back to the IQ demodulator 144 (Fig. 1 3). It is optional to also evaluate 
continual pilots in order to cope with larger frequency errors. Sampling rate error, output 
on line 564 is determined by looking at the phase difference between pilots in a symbol 
and the same pilots in a previous symbol. The differences vary across the symbol, 
giving a number of points through which a line can be fitted using the well known 
method of least squares regression. The slope of this line is indicative of the magnitude 
.and direction of the sampling rate error. The sampling rate error derived in this way is 
filtered in low pass filter 566 before being fed back to the sine interpolator 1 58 (Fig. 1 3). 

A separate store 568 for the scattered pilots contained in 4 symbols is shared by 
the frequency error section 570 and the sampling rate error section 572. Direct 
comparison of scattered pilot symbols is thereby facilitated, since the scattered pilot 
phase repeats every four symbols. In an alternate embodiment where scattered pilots 
are used to provide control information, storage must be provided for four symbols. In 
the preferred embodiment, wherein control information is derived from continual pilots, 
storage for only one symbol is needed. 

Recovery of the angle of rotation a from the I and Q data is accomplished in the 
phase extract block 574, where 

a = tan"^(Q/l) (55) 

In the presently preferred embodiment, the computations are done at a resolution of 14 

bits. The phase extract block 574 is illustrated in greater detail in Fig. 43. The quadrant 

of a is first determined in block 576. The special cases where I or Q have a zero 

magnitude or I = Q is dealt with by the assertion of signals on lines 578. If the magnitude 

of Q exceeds that of I, quotient inversion is accomplished in block 580, utilizing a control 

signal 582. A positive integer division operation is performed in division block 584. 

Although this operation requires 11 clock cycles, there is more than enough time 

allocated for phase extraction to afford it. The calculation of the arctangent of the 

quotient is accomplished by a pipelined, truncated iterativecalculation in block 586of the 
Taylor Series 
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w3 v"^ 

tan-\x) = X-—-—- — - — -- . lx|<1 (56) 

3 5 7 9 

Block 586 is shown in greater detail in the schennatic of Fig. 44. The value is 
5 calculated once in block 588 and stored for use in subsequent iterations. Powers of x 
are then iteratively computed using feedback line 590 and a multiplier 592. The divisions 
are calculated using a constant multiplier 594 in which the coefficients are hardwired. 
The sum is accumulated using adder/subtractor 596. The entire computation requires 
47 - 48 clock cycles at 40 MHz. 

10 Turning again to Fig. 43, quadrant mapping, and the output of special cases is 

handled in block 598 under control of block 576. It may be noted that the square error 
of the result of the Taylor Expansion rises rapidly as a approaches 45 degrees, as 
shown in Fig. 45 and Fig. 46, which are plots of the square error at different values of 
a of the Taylor expansion to 32 and 31 terms respectively. The Taylor expansions to 31 

1 5 and 32 terms are averaged, with the result that the square error drops dramatically, as 
shown in Fig. 47. A memory (not shown) for holding intermediate values for the 
averaging calculation is provided in block 598. 

Constant Phase Error across all scattered Pilots is due to frequency offset at IQ 
Demodulator. Frequency Error can be defined as: 



20 



35 



.where a, m and T. have the same meanings as given above, a is determined by taking 
the average of the difference of phase values of corresponding pilots between the 

25 current symbol and a symbol delayed for m symbol periods. In the above equation, m 
= 1 in the case of continual pilots. This computation uses accumulation block 600 which 
accumulates the sum of the current symbol minus the symbol that preceded it by 4. 
Accumulation block 602 has an x multiplier, wherein x varies from 1 to a minimum of 142 
(in 2K mode according to the ETS 300 744 telecommunicationsstandard). The low pass 

30 filters 562, 566 can be implemented as moving average filters having 10-20 taps. The 
data available from the accumulation block 602 is the accumulated total of pilot phases 
each sampled m symbols apart. The frequency error can be calculated from 



- _ Acc{new-old} 

'err /Ki\/o\rT«.T ^^^^ 

{N)(2)nmTj 

N = 142 in the case of scattered pilots, and 45 for continual pilots, assuming 2K 
mode of operation according to the ETS 300 744 telecommunications standard. The 
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technique for determining sampling rate error is illustrated in Fig. 48, in which the phase 
differences of pilot carriers, computed from differences of every fourth symbol (S^ - S^^j 
are plotted against frequency of the carriers. The line of best fit 604 is indicated. A slope 
of 0 would indicate no sampling rate error. 
5 Upon receipt of control signal 606 from the pilot locate block 408 (Fig. 14), a 

frequency sweep is initiated by block 608, which inserts an offset into the low-pass 
filtered frequency error output using adder 610. Similarly a frequency sweep is initiated 
by block 61 2, which inserts an offset into the low-pass filtered sampling rate error output 
using adder 614. The frequency sweeps are linear in increments of 1/8 of the carrier 

10 spacing steps, from 0 - 3.5kH2 corresponding to control signal values of 0x0-0x7. 

A preferred embodiment of the correction circuitry 174 (Fig. 14) is shown in greater 
detail in Fig. 49. Continual pilots rather than scattered pilots are held in a memory store 
616 at a resolution of 14 bits: The generation of the multiplier x for the computation in 
the accumulation block 618 is more complicated, since in accordance with the noted 

15 ETS 300 744 telecommunications standard, the continual pilots are not evenly spaced 
as are the scattered pilots. However, it is now only necessary to evaluate 45 continual 
pilots (in 2K mode according to the ETS 300 744 telecommunications standard). In this 
embodiment only the continual pilots of one symbol need be stored in the store 616. 
Inclusion of the guard inten/al size, is necessary to calculate the total duration of the 

20 symbol Tj, is received from the FFT window circuitry (block 166, Fig. 14) on line 620. 

The input and output signals and signals relating to the microprocessor interface 
142 of the circuitry illustrated in Fig. 42 are described in tables 24. 25, 26, and Table 27 
respectively. The circuitr/ is further disclosed in Verilog code listings 24 - 35. 
Demapper 

25 The demapping circuitry 176 (Fig. 15) is shown as a separate block for clarity, but 

in practice is integrated into the channel estimation and correction circuitry. It converts 
I and Q data, each at 12-bit resolution into a demapped 12-bit coded constellation 
format (3-bit I. I soft-bit. 3-bit Q, Q soft-bit). The coded constellation is illustrated in Fig. 
50 and Fig. 51. For 64-QAM the 3 bits are used for the I and Q values, 2 bits for 
30 16-QAM 2-bits and 1 bit for QPSK. 

For example in Fig. 51 values of 1= 6.2. Q= -3.7 would be demapped to: l-data = 
001; I soft-bit=011; Q-data=101; Q soft-bit=101. 

The input and output signals of the demapping circuitry 1 76 are described in tables 
28 and 29 respectively. 
35 Symbol Deinterleaver 

The symbol deinterleaver 182 (Fig. 15) reverses the process of symbol interleaving 
of the transmitted signal. As shown in Fig. 52 the deinterleaver requires a 1512 x 13 
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memory store, indicated as block 622. The address generator 624 generates addresses 
to write in interleaved data and read out data in linear sequence. In practice the address 
generator 624 is realized as a read address generator and a separate write address 
generator. Reading and writing occur at different instantaneous rates in order to reduce 
the burstiness of the data flow. The address generator 624 is resynchronized for each 
new COFDM symbol by a symbol timing pulse 626. Carrier of index 0 Is marked by 
carrierO pulse 628. Addresses should be generated relative to the address in which this 
carrier is stored. 

The input and output signals of the symbol deinterleaver 182 are described in 
tables 30 and 31 respectively. Circuitry of the symbol deinterleaver 182 is disclosed in 
Verilog code listing 22. 
Bit Deinterleaver 

Referring to Fig. 54, the bit deinterleaver 1 84 (Fig . 1 5) reverses the process of bit- 
wise interleaving of the transmitted signal, and is shown further detail in Fig. 53. In soft 
encoding circuitry 630 input data is reformatted from the coded constellation format to 
a 24 bit soft l/Q format. The soft encoding circuitry 630 is disclosed for clarity with the 
bit deinterleaver 184, but is realized as part of the symbol deinterleaver discussed 
above. The deinterleave address generator 632 generates addresses to read the 6 
appropriate soft-bits from the 126 x 24 memory store 634, following the address 
algorithm in the ETS 300 744 telecommunications standard. The deinterleave address 
generator 632 is resynchronized for each new COFDM symbol by the symbol timing 
pulse 626. 

The output interface 636 assembles I and Q output data streams from soft-bits 
read from, the memory store 634. Three I soft bits and three Q soft bits are extracted 
from the memory store 634 at each deinterleave operation, and are parallel-serial 
converted to provide the input data stream to the Viterbi Decoder 186 (Fig. 15). 

The input and output signals of the bit deinterleaver 184 are described in tables 
32 and 33 respectively. Circuitry of the bit deinterleaver 1 84 is disclosed in Verilog code 
listing 23. 

Host Microprocessor Interface 

The function of the microprocessor interface 142 is to allow a host microprocessor 
to access control and status information within the multicarrier digital receiver 126 (Fig. 
12). The microprocessor interface 142 is shown in greater detail in Fig. 55. A serial 
interface 638 and a parallel interface 640 are provided, the latter being primarily of value 
for testing and debugging. The serial interface 638 is of known type and is 12C 
compatible. The microprocessor interface 142 includes a maskable interrupt capability 
allowing the receiver to be configured to request processor intervention depending on 
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internal conditions. It should be noted, that the muiticarrier digital receiver 126 does not 
depend on intervention of the microprocessor interface 142 for any part of its normal 
operation. 

The use of interrupts from the point of view of the host processor is now described. 
5 "Event" is the tenn used to describe an on-chip condition that a user might want to 
observe. An event could indicate an error condition or it could be informative to user 
software. There are two single bit registers (not shown) are associated with each 
interrupt or event. These are the condition event register and the condition mask 
register. 

10 The condition event register is a one bit read/write register whose value is set to 

one by a condition occurring within the circuit. The register is set to one even if the 
condition only existed transiently. The condition event register is then guaranteed to 
remain set to one until the user's software resets it. or the entire chip is reset. The 
condition event register is cleared to zero by writing the value one. Writing zero to the 

1 5 condition event register leaves the register unaltered. The condition event register must 
be set to zero by user software before another occurrence of the condition can be 
observed. 

The condition mask register is a one bit read/write register which enables the 
generation of an interrupt request if the corresponding condition event register is set. 

20 If the condition event is already set when 1 is written to the condition mask register an 
interrupt request will be generated immediately. The value 1 enables interrupts. The 
condition mask register clears to zero on chip reset. Unless stated othenwise a block will 
stop operation after generating an interrupt request and will restart soon after either the 
condition event register or the condition mask register are cleared. 

25 Event bits and mask bits are always grouped into corresponding bit positions in 

consecutive bytes in the register map. This allows interrupt service software to use the 
value read from the mask registers as a mask for the value in the event registers to 
identify which event generated the interrupt. There is a single global event bit that 
summarizes the event activity on the chip. The chip event register presents the OR of 

30 all the on-chip events that have 1 in their respective mask bit. A value of 1 in the chip 
mask bit allows the chip to generate interrupts. A value of 0 in the chip mask bit 
prevents any on-chip events from generating interrupt requests. Writing 1 or 0 to the 
chip event register has no effect. The chip event register only clears when all the events 
enabled by a 1 in their respective mask bits have been cleared. 

35 The IRQ signal 642 is asserted if both the chip event bit and the chip event mask 

are set. The IRQ signal 642 is an active low. "open collector" output vyhich requires an 
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off-chip puli-up resistor. When active the IRQ output is pulled down by an impedance 
of 100O or less, A pull-up resistor of approx. 4kQ is suitable. 

The input and output signals of the microprocessor interface 142 are described in 
tables 34 and 35 respectively. 
5 System Controller 

The system controller 1 98 (Fig. 1 5), which controls the operation of the multicarrier 
digital receiver 126 (Fig. 12), in particular channel acquisition and the handling of error 
conditions, is shown in further detail in Fig. 56. 

Referring to the state diagram in Fig. 57, the channel acquisition sequence is 
10 driven by four timeouts. 

(1 ) AGC acquisition timeout. 20 ms (80 symbols) are allowed for the AGC to bring 
up the signal level, shown in step 644. Then the FFT window is enabled to start 
acquisition search in block 646. 

(2) Symbol acquisition timeout; 200 symbol periods, the maximum guard interval 
15 plus active symbol length, is allocated to acquire the FFT window in step 648. Another 

35 symbol periods are allocated to pilot location in step 650. Approximately 50 ms are 
required to process 2K OFDM symbols. An option is provided to exit step 650 as soon 
as the pilots have been located to save acquisition time in non-extreme situations. 

(3) Control Loop Settling timeout: A further 10 ms. representing approximately 40 
20 symbols is allocated to allow the control loops to settle in step 652. An option is provided 

to exit step 652 and return to an initial step resync 654 if pilots have been lost if control 
loop settling timeout occurs. 

(4) Viterbi synchronizationtimeout: In block 656 approximately 1 50 symbol periods 
are allocated for the worst case of tps synchronization, indicated by step 658 and 

25 approximately 100 symbol periods for the Viterbi Decoder 186 (Fig. 15) to synchronize 
to the transmitted puncture rate, shown as step 660. This is approximately 65 ms. In 
reasonable conditions it is unnecessary to wait this long. As soon as Viterbi synchroni- 
zation is established, then transition to the systemjock state 662. It is possible to 
bypass the tps synchronization requirement by setting parameters (see table below) in 

30 the receiver parameters register and setting set_rx_parameters to 1. 

If acquisition fails at any stage, the process automatically returns to step resync 
654 for retry. 

Having acquired lock, the system will remain in lock unless a Reed-Solomon 
overload event occurs, i.e. the number of Reed-Solomon packets with uncorrectable 
35 errors exceeds a predetermined value (the rsojimit value) in any 1 second period. If 
any of the 4 synchronizing state machines in the acquisition sequence, FFT window 
(step 648). pilot locate (step 650), tps synchronization (step 658) and Viterbi synchroni- 



wo 98/19410 PCT/US97/18911 

50 

zation (step 660), lose synchronization once channel acquisition has occurred, no action 
will be taken until an event. rso_event, occurs and the step resync 654 is triggered 
automatically. 

In poor signal conditions acquisition nnay be difficult, particularly the Viterbi 
5 synchronization. Therefore a bit is optionally provided in the microprocessor interface 
142 ( Fig. 12), which when set extends the timeouts by a factor of 4, 

The input and output signals, and the microprocessor interface registers of the 
system controller 198 are described in tables 36, 37, 38, and 39 respectively. 



Tables 



Pin Name 


I/O 


Description 


Tuner/ADC Interface 


SCLK 


O 


Sample clock for ADC 


IDATA[9;0] 


1 


Input ADC data bus (10-bit) 


AGC 


o 


Automatic Gain Control to 
tuner(Sigma-Delta output) 


XTC[2:0] 


o 


External Tuner Control Outputs 


MPEG-2 Transport Interface 


OUTDAT[7:0] 


o 


MPEG-2 Transport Stream Data bus 


OUTCLK 


0 


MPEG Transport Stream Output Clock 


SYNC 


o 


MPEG Transport Stream Sync pulse (1 
per 188byte) 


VALID 


o 


MPEG Transport Stream Valid data flag 


ERROR 


o 


MPEG Transport Stream Errored data 
flag 


Serial Host Microprocessor Interface 


SD 


I/O 


Serial Interface Data 


SC 


1 


Serial Interface Clock 


SDT 


I/O 


Serial Data Througli 


SCT 


0 


Serial Clock Through (40MHz clock out 
when DEBUG is high) 


SADDR[2:0] 


1 


Serial Address inputs (Hardwired exter- 
nal value) used as TSEL pins when DE- 
BUG is high 


Parallel Host Microprocessor interface 
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Pin Name 


I/O 


Description 


MA[5:0] 




Microprocessor Address Bus 


MD[7:0] 


I/O 


Microprocessor Data Bus 2-bit/DEBUG 
data @40MHz 


MWE 




Microprocessor Write Enable 


MCE 




Microprocessor Chip Enable 


NOTIRQ 


0 


Interrupt Request 


JTAG Test Access Port 


TCK 




JTAG Test Clock 


TMS 




JTAG Test Mode Select 


TDI 




JTAG Test Data In 


TDO 


o 


JTAG Test Data Out 


NTRST 




JTAG TAP Controller Reset 


Miscellaneous Pins 


NRESET 




Asynchronous Reset 


CLK40 




40MHz Input Clock 


TSTRI 




Transport Stream Interface tristate con- 
trol 


TA (MA[6]) 




Test Address Bit - Snooper access (Bit 7 
of up address bus) 


DEBUG 




Test Pin 


TSEL [2;0]/SADDR[2:0] 




Internal Test Inputs (mux out internal 

data onto MD[7:0]) 

0 = normal upi, 

1=fft input data (24-bit), 

2 = fft output data (24-bit). 

3 = channel correction output data 
(24-bit). 

4 = fee input data. (2 x 3-bit softbit) 

all data clocked out @40MHz. 24-bit data 
in 4 bytes. Clock brought out on SCT pin. 
for convenience. Symbol timing/other 
synch, signals indicated with market bits 
in data. 


TLOOP 


1 


Test Input 
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Ad- 
dress 
(Hex) 


Bit No. ' 


Dir/Re- 
set 


Register Name 


Description 


0x00 


Event Reg. 




0 


RAA//0 


chip_event 


OR of all events which are 
interrupt-enabled (un- 
masked) 




1 


R/W/0 


lock_failed_event . 


Set to 1 if channel acquisi- 
tion sequence fails 




2 


R/W/0 


rs_overload_event 


Set to 1 if Reed-Solomon 
Decoder exceeds set 
threshold within one 1 sec- 
ond period 


0x01 


Mask Reg. 




0 


R/W/0 


chip_mask 


Set to 1 to enable IRQ out- 
put 




1 


R/W/0 


lock_failed_mask 


Set to 1 to enable interrupt 
on channel acquisition fail 




2 


RAA//0 


rs_overload_mask 


Set to 1 to enable interrupt 
on RS error threshold ex- 
ceeded 


0x02 


Status Reg. 




0 


R/0 


systemjocked 


Set to 1 when system ac- 
quired channel successfully 




1 


R/0 


viterbi_sync 


Set to 1 when Viterbi is syn- 
chronized 




2 


R/0 


tps_sync 


Set to 1 when OFDM frame 
carrying TPS data has been 
synchronized to. 




3 


R/0 


pilGt_loc 


Set to 1 when pilots in 
COFDM symbol have been 
located and synchronized 
to 




4 


R/0 


fft_loc 


Set to 1 when guard inter- 
val has been located and 
synchronized to. 




7:5 


R/1 


viterbi_rate 


Received Viterbi Code rate 


0x04- 
0x05 


Control Reg: 


0 


R/W/0 


change_channel 


When set to 1 , holds device 
in "Reset" state. Clearing 
this bit initiates channel 
change. 
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Ad- 
dress 
(Hex) 


Bit No. 


Dir/Re- 
set 


Register Name 


Description 




1 


R/W/0 


agcjnvert 


Invert AGC Signa-Delta 
output. Default setting 
means low output associ- 
ated with reduced AGC 
gain. 




2 


RAA//0 


o_clk_phase 


Set to 1 to invert phase of 
output clock. Default condi- 
tion: output data changes 
on falling edge of output 
clock. 




3 


R/W/0 . 


set_rx_pa ra meters 


Set to 1 to take Receiver 
Parameter Data from Re- 
ceiver Parameter Register. 
Default condition: settings 
taken from TPS data (lon- 
ger channel acquisition 
time) 




4 


R/W/0 


extend_agc 


Set to 1 to hold acquisition 
sequence in agc^acquire 




5 


R/W/0 


extend_fs 


Set to 1 to hold acquisition 
sequence in fs_acquire 

bid It; 




6 


R/W/0 


extend_settle 


Set to 1 to hold acquisition 
ocquciioc in 1 jcilic oiciic; 




7 


R/W/0 


extend_sync 


When set to 1 to hold ac- 
quisition sequence in 
vit_sync state 




10:8 


R/W/0 


xtc 


External Tuner Control bits 
(external pins XTC[2:0]) 




11 


R/W/0 


i2c_gate 


12C "Gate" signal; setting 
this to 1 enables the isola- 
tion buffer between the 
"processor side12C" bus 
and the Tuner side 12C 
so the processor can ac- 
cess a Tuner through 
COFDM device. Setting to 
0 closes the "gate" to pre- 
vent 12C bus noise affect- 
ing delicate RF. 
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Ad- 
dress 
(Hex) 


Bit No. 


Dir/Re- 
set 


Register Name 


Description 




12 


R/W/ 
(TSTRI) 


ts_tri 


Transport Stream Instate 
coniroi - set to i to tnstate 
MPEG TS interface (e.g. to 
mux a QPSK device to 
same MPEG demux). 
Power-on state of TS out- 
put controlled by external 
pin TSTRI. 




13 


R/W/0) 


fast_ber 


Set to 1 to reduce BER 
counter, vitjll_state coun- 
ter and rso_counter, coun- 
ter periods from 1 sec to 
100ms. 




15 


R/W/0 


soft_reset 


Software Reset - set to 1 to 
reset all blocks except upi. 
Set to 0 to release. 


uxud- 
0x07 


Receiver Parameter Register: 




15:14 


R/W/2 


upi_constellation 


Constellation Pattern for 
Demapper and Bit 
Deinterleaver (reset condi- 
tion = 64-QAM) 




13:12 


R/W/0 


upi_guard 


Guard Interval: 00 = 1/32. 
01 = 1/16, 10 = 1/8. 11 = 
1/4 




11:9 


R/W/0 


upi_alpha 


Hierarchical Tranmission 
Mode or "alpha value" (re- 
set condition = 
non-hierarchical mode) 




7:5 


R/W/0 


upi_hp_rate 


Viterbi Code Rate for HP 
stream - in non-hierarchical 
mode this is taken as the 
Viterbi Code Rate (reset 
condition = 1/2 rate code) 




4:2 


R/W/0 


uP'JP-rate 


Viterbi Code Rate for LP 
stream (reset condition = 
1/2 rate code) 




1:0 


R/W/0 


upi_tx_mode 


Tranmission mode (00=2K, 
01=8K. others reserved) 


0x08 


7:0 


R/W/0 


rsojimit 


Errored packet per second 
limit (for rs overload event 
bit) 
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Ad- 
dress 


Bit No. 


Dir/Re- 
set 


Register Name 


Description 


0x09 


7:0 


R/0 


rso_count 


Count of Uncorrectable 
Transport Packets per sec- 
ond (saturates at 255). 
Write to register to latch a 
stable count value which 
can then be read back 


OxOa- 
OxOb 


15:0 


R/0 


bar 


BER (before RS) deduced 
from RS corrections in 1 
second period - max cor- 
rectable bit errors 
-1.35M/secfor 7/8, 
64-QAM, 1/32 Gl (equiva- 
lent to 43.e-3 BER assum- 
ing useful bitrate of 31.67 
e6). Only top 16 bits of 21 . 
bit counter are visible - res- 
olution of ~1e-6 depending 
on code-rate, constellation 
Gl length. Write to register 
to latch a stable count 
V3iue wnicn C3n inen ue 
read back. 


OxOc- 
OxOd 


15:0 


R/0 


agcjevel 


AGC "Control Voltage" 
(msb's) 


OxOe- 
OxOf 


11:0 


R/0 


freq_error 


IQ Demodulator Frequency 
Error (from feedback loop) 


0x10- 
0x13 


TPS Data (including future use bits) 




1:0 


R/0 


tps_frame 


Nunnber of last received 
cmplete OFDM frame in 
superframe 


3:2 


R/0 


tps_constellation 


Constellation Pattern from 
TPS data 


7:5 


R/0 


tps_alpha 


Hierachical Transmission 
Information 




10:8 


R/0 


tps_hp_rate 


Viterbi Code Rate of 
High-Priority stream (In 
non-hierarchical mode this 
is the code rate of the en- 
tire stream) 


13:11 


R/0 


tps_lp_rate 


Viterbi Code Rate of 
Low-Priority stream 


15:14 


R/0 


tps_guard_int 


Guard Interval 
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Ad- 
dress 
(Hex) 


Bit No. 


Dir/Re- 
set 


Register Name 


Description 




17:16 


R/0 


tps_tx_mode 


Transmission Mode 


31:19 


R/0 


tps_future 


Undefined bits allocated for 
future use 


Debu 


ig Access *** 


0x20- 
0x21 


15 


RA/V/0 




oei 10 I to DreaK AGC con- 
trol loop 


11:0 


R/W/0 




Mou twiaciie tactor 


0x22- 
0x23 




R/W/0 


agc_loop_bw 


AGC Control loops parame- 
ters 


0x24- 
0x25 


15 


R/W/0 


freq_open 


Set to 1 to break freq con- 
trol loop 


14 


R/W/0 


freq_nogi 


Set to 1 to allow frequency 
update anytime, not just 
during Guard Interval 


11:0 


R/W/0 


freq^twiddle 


IQ Demod twiddle factor 


0x26- 
0x27 






freq_loop_bw 


Frequency Control Loop 
parameters 


0x28- 
0x29 


15 


R/W/0 


sample_open 


Set to 1 to break samole 
control loop 


14 


R/W/0 


sample_nogi 


Set to 1 to allow sample 
update anytime, not just 
during Guard Interval 


11:0 


R/W/0 


sample_twiddle 


Sampling Rate Twiddle fac- 
tor 


0x2a- 
0x2b 




R/W/0 


sample_loop_bw 


Sampling Rate Control 
Loop parameters 


0x2c- 
0x2d 


11:0 


R/0 


sampling_rate_err 


Sampling Rate Error (from 
feedback loop) 


0x30- 
0x31 


15 


R/W/0 


lock_fft_window 


Set to 1 to prevent 
fft_window moving in Track- 
ing mode 


14 


R/W/0 


inc_fft_window 


Write 1 to move fft_window 
position one sample period 
later (one-shot operation) 




13 


R/W/0 


d e c_fft_wi n d o w 


Write 1 to move fft_window 
position one sample period 
earlier (one-shot operation) 




12:0 


R/0 


fft_window 


FFT Window position 
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Ad- 
dress 
(Hex) 


Rit K\r\ 


uir/Ke- 
set 


Kegisier Name 


LJ6Sunpiiun 




7:0 


R/W/0 


fft_win_thresh 


FFT Window Threshold 


0x34- 
0x35 


15 


R/W/0 


set_carrier_0 


Set to 1 to use carrier_0 
value as setting 


11:0 


RAA//0 


carrier_0 


Carrier 0 position; readback 
value detected by Pilot Lo- 
cate algorithm or force a 
value by writing over it 


0x36 


7:0 


RAA// 


csi thresh 


Channel State Information 

• • %^ lilt \^ t fcS^ 1111 1 i i 1 b 1 \^ I 1 

threshold - the fraction of 
mean level below which 
data carriers are marked by 
a bad_carrier flag. Nomi- 
naiiy u,z (tor z/o code rate). 


0x37 










0x38- 
0x39 


11:0 


R/0 


vitjll_states 


Viterbi Illegal State Rate 
(per second)Write to regis- 
ter to latch count which can 
then be read back 


***** SNOOPERS ***** ( External test address bit TA[6] = 1 ) 


0x40- 
0x41 


15:14 
11:0 


R/WR/ 
W 


T.IQGIFreq error[ 
11:0] 


IQ Demod Snooper (Note: 
bit 0 = Isb of highest ad- 
dressed byte, 21) 


0x44- 
0x47 


31:30 
27:16 
11:0 


R/W 
R/W 
R/W 


T, Valid 

Q-data[11:0] 

l-data[11:0] 


Low-Pass Filter Snooper 


0x48- 
0x4d 


47:46 
43:32 
31 

27:16 
11:0 


R/W 
R/W 
R/W 
R/W 
R/W 


T.SincGI 

Sample err[11:0] 
Valid 

Q-data[11:0] 
l-data[11:0] 


Resampler Snooper 


0x50- 
0x53 


31:29 
27:16 
11:0 


R/W 
R/W 
R/W 


T, Valid. Resync 

Q-data[11:0] 

l-data(11:C) 


FFT Snooper 


0x54- 
0x57 


31:30 
29:28 
27:16 
11:0 


R/W 
R/W 
R/W 
R/W 


T. Valid. 
Symbol. Resync 
Q-data[11:0] 
l-data[11:0] 


Channel Estimation & Cor- 
rection Snooper 


0x58- 
0x5b 


31:30 
29:28 
27:16 
11:0 


R/W 
R/W 
R/W 
R/W 


T, Resync 

u symbol, uc pilot 

Q-data[11:0] 

l-data(11:0] 


Frequency & Sampling Er- 
ror Snooper 
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Ad- 
dress 


Bit No. 


Dir/Re- 
set 


Register Name 


Description 


0x5c- 
0x5f 


31:30 

29:28 

27:16 

15 

11:0 


R/W 
R/W 
R/W 
R/W 
R/W 


T, Resync 

c symbol, tps pil. 

Q-data[11:0] 

reference seq 

l-clata[11:0] 


TPS Sequence Extract 
Snoopers 


0x60- 
0x65 


39 

36:35 
34:32 
27:16 
15:14 

1 ^ 

I O 

11:0 


R/W 
R/W 
R/W 
R/W 
R/W 
R/W 
R/W 


T 

1 

constellation 
alpha 

Q-data[11:0] 
Valid, c_symboi 
c Carrie rO 
l-data[11:0] 


Demap Snooper 


0x68- 
0x6a 


23:22 
21:20 

11:0 


R/W 
R/W 
fvW 
R/W 


T, valid symbol, 
carrierO 
odd symbol 
demap__data[11:0] 


Symbol Deinterleave 
Snooper 


0x6c- 

UaDc 


23:21 

18:16 
11:0 


R/W 
R/W 
R/W 
R/W 


T. valid, symbol 

constellation 

alpha 

symdi_data[1 1:0] 


Bit Deinterleaver Snooper 


UX / u- 

0x71 


6:4 
2:0 


A A / 

R/W 
R/W 
R/W 


T. valid, resync 

Q-data[2:0] 

l-data[2:0] 


Viterbi Snooper 


0x72- 


15:14 

1 O. 1 

7:0 


R/W 

O A A # 

R/W 
R/W 


T, valid, 
resync, eop 
vit_data[7:0] 


Forney Deinterleaver 
Snooper 


0x74- 
0x75 


15:14 
13:12 

/ .u 


R/W . 

R/W 

K/W 


T, valid, 
resync. eop 
deint_data[7:0] 


Reed Solomon Snooper 


0x76- 
0x77 


15:14 
13:12 
11:0 
7:0 


R/W 
R/W 
R/W 
R/W 


T, valid, 
resync, eop 
error val, error 
deint_data[7:0] 


Output Interface Snooper 


0x78- 
0x7b 


31 

30:20 

19:18 

17 

16 

14 

13:8 

6:5 

4:3 

2:0 


R/W 
R/W 
R/W 
R/W 
R/W 
R/W 
R/W 
R/W 
R/W 
R/W 


T 

tps_data[10:0) 
pkt_err, err val 
vitJII state 
vit_ill_val 
rs_corr_val 
rs_correct[5:0] 
vit_sync, tps sync 
pilot loc. fft loc 
vit_ratef2;0] 


System Controller Snooper 
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Signal 


uescnpiion 


elk 


40MHz main clock 


clk20M 


2OMH2 sample clock (used as a "valid" signal tb indicate 
when valid input samples are received) 


data[9:0] 


sampled data input from ADC 


aac resvnc 


control input; held tow on channel change - on transition 
to high AGC should reset itself and accumulate new 
coniroi voltage lor new cnannei. 


lupaata[7.0] (Di-di) 


internal Microprocessor uata ous 


upaddr[2:0] 


Internal Microprocessor Address Bus (only 2-bits re- 
quired) 


upwstr 


Internal uP write strobe 


uprstr 


Internal uP read strobe 


upsell 


Internal Address decode output (high = valid for 
OxOc-OxOd) 


upsel2 


Internal Address decode output (high = valid for 0x20- 
0x23) 


te, tdin 


Scan inputs 



Table 6 



Signal 


Description 


age 


Signal - Delta modulated output signal; when integrated 
by external RC it provides an analogue representation of 
the internal digital "control voltage" valuelnterpolated 
output data 


tdout 


scan outputs 



Address 
(Hex) 


Bit No. 


Dir/Re- 
set 


Register 
Name 


Description 


OxOc- 
OxOd 


15:0 


R/0 


agcjevel 


AGC "Control Voltage" (msb^s) 


0x20- 
0x21 


15 


R/W/0 


agc_open 


Set to 1 to break AGC control 
loop 


11:0 


R/W/0 


agc^twiddle 


AGC twiddle factor 


0x22- 
0x23 




R/W/0 


agcJoop_bw 


AGC Control loops parameters 



Table 8 
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Signal 


Description 


elk 


40MHz main clock 


nrst 


Active-low svnchronous rp<?pt 


clk20M 


20MH2 sample clock (used as a "valid" signal to indicate 
when inout data samDie i<? valiH^ 


sannple[9:0] 


input data sample from ADC. (AGC should ensure that 

this white-noise-like Sianai i«; ^ralpH tn full Hv/namir r^^n^^a^ 


freq_err[11:0] 


Frequency Error input - 1Hz accurate tuning over +/-0.5 
carrier spacing 


IQGI 


Valid pulse for enable frequency error signal. The effect of 
the frequency control loop is held off until a guard interval 
is passing through the IQ Demod block. (IQGI is gener- 
dit^a uy tne rr i winaow ano inaicates when a guard 
interval is passing). 


te, tdin 


Scan test inputs 


Table 9 


Signal 


Description 


l-data[11:0] 


1 data-stream to be low-pass filtered (40 MHZ timing) 


Q-data[11:0] 


Q data-stream to be low-pass filtered (40 MHZ timing) 


valid 


Valid output data indicator; high if data is being output on 
this clock cycle (40 MHZ timing) 


tdout 


Scan test output 


Table 10 


Signal 


Description 


elk 


40MHz clock (2x sample clock) 


nrst 


Active-low synchronous reset 


validjn 


high-pulse indicating valid data from IQ-demodulator 
(40MH2 timing) 


i data[11:0]. 
q_data[11:0] 


input data from IQ-demodulator (20Msps) 


te. tdin 


Scan test inputs 


Table 1 1 


Signal 


Description 


i out[11:0]. 
q_out[11:0] 


Low-Pass filtered output data 
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Signal 


Description 


valid 


Output pulse indicating valid data output (decimated to 
lOMsps) 


tdout 


Scan test output 


Table 12 


Signal 


Description 


clkAOM 


40MHz main clock (2x sample clock) 


validjn 


input data valid signal; when valid is low, input data 
should be ignored 


i data[11:0]. 
q_data[11:0] 


input data from low-pass filter (decimated to lOMsps) 


sr_err[11:0] 


SamplingRate Error feedback fro Freq/Sampling Error 
block 


SincGI 


Valid pulse for Error signal; effect of Sampling Rate 
contol loop is held off until guard inten/al is passing 
through Sine Interpolator. FFT Window block generates 
this signal at appropriate time. 


te.tdin 


Scan test signals 


Table 1 3 


Signal 


Description 


i out[11:0], 
q_6ut[11:0] 


Interpolated output data 


valid 


Output pulse indicating valid data output) 


tdout 


Scan test output 


Table 14 


Signal 


Description 


clk40M 


40MHz clock (2x sample clock) 


validjn 


input data valid signal; when valid is low. input data 
should be ignored 


i_data[11:01 


input data from front-end (ignore quadrature data for this 
block) 


resync 


Control signal: forces Sync FSM back to acquisition mode 
when pulsed high 


guard[1:0] 


Expected guard interval; programmed by Host uP to aid fft 
window acquisition. 00 = 1/32, 01 = 1/16. 10 = 1/8, 11 = 
1/4 
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Signal 


Description 


lupdata[7:0] (bi-di) 


Internal Microprocessor Data bus (bi-directional) 


upaddr(0] 


Internal uP address bus (only 1-bit required) ' 


upwstr 


Internal uP write strobe 


uprstr 


Internal uP read strobe 


upsel 


Address decode output to select FFT window block 


Table 15 


Signal 


Description 


FFT_Window 


Timing output pulse; low for 2048 samples indicating the 
active interval 


fftjock 


Output pulse indicating status of Sync FSM; 1 = Symbol 
acquired 


rx_guard[1 :0] 


Received Guard Interval Size: 00 = 1/32 01 = 1/16 10 = 
1/8, 1 1 = Vi 


IQGI 


Timing pulse indicating when the guard interval should 
arrive at the IQ demodulator (Frequency Error only cor- 
rected in the Guard Interval) 


SincGI 


Timing pulse indicating when the guard interval should 
arhve at the Sine Interpolator (Sampling Error only cor- 
rected in the Guard Interval) 


sr_sweep[3:0] 


Sampling Rate sweep output; 4-Bit output used by Fre- 
quency and Sampling Error block to generate Sampling 
Rate "ping-pong" sweep during FFT window acquisition 


Table 16 



Address 
(Hex) 


Bit 
No. 


Dir/Reset 


Register Name 


Description 


0x30- 
0x32 


15 


R/W/0 


lock_fft_window 


Set to 1 to prevent 
fft^window moving in Track- 
ing mode 




14 


R/W/0 


inc_fft_window 


Write 1 to move fft_window 
position one sample period 
later (one-shot operation) 




13 


R/W/0 


dec_fft_window 


Write 1 to move fft_window 
position one sample period 
earlier (one-shot operation) 




12:0 


R/0 


fft_window 


FFT Window position 
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Address 


Bit 


Dir/Reset 


Register Name 


Description 


(Hex) 


No. 










7:0 


R/W/0 







Table 17 



Signal 



Description 



clk40M 



40MHz clock {2x sample clock) 



nrst 



Synchronous reset (active low) 



valid in 



input data valid signal; when valid is low, input data should 
be ignored 



i_data[11:0], 
q_data[11:0] 



input data from FFT 



symbol 



Symbol timing pulse from FFT; high for first valid data 
value of a new symbol 



resync 



Resynchronization input triggered on e.g. channel change. 
Pulsed high to indicate return to acquisition mode (wait for 
first symbol pulse after resync before beginning pilot 
search) 



lupdata[7:0] (bi-di) 



Internal Microprocessor Databus 



upaddr[0] 



Internal uP address bus (only 1-bit required) 



upwstr 



Internal uP write strobe 



uprstr 



Internal uP read strobe 



upset 



Internal address decode output: high for addresses 0x032-(}ix033 



Table 18 



Signal 


Description 


ui data[11:0]. 
uq_data[11:01 


Uncorrected spectrum data, as read from RAM buffer (for 
Frequency/Sampling Error block) 


u_symbol 


Uncorrected symbol start; high for first carrier of the un- 
corrected symbol 


us_pilot 


high for any carrier which is a scattered pilot in the uncor- 
rected symbol 


ci data(11:0], 
cq_data[11:0] 


Corrected spectrum data; as output from the complex 
multiplier 


valid 


high for valid corrected symbol - data carriers only 


bad_carrier 


high if interpolated channel response for the carrier is 
below pre-set fraction of the mean of carriers of previous 
symbol - viterbi will discard the data carried by this carrier 
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Signal 


Description 


c_symbol 


high for the first carrier in the corrected symbol 


c_carrierO 


high for the first active carrier in the corrected symbol (a 
continual pilot corresponding to a carrier index value of 0) 


c_tps_pilot 


high for any carrier in the corrected symbol which is a 
TPS pilot 


pilotjock 


output high if pilots successfully located at the end of pilot 
acquisition phase. 


odd_symbol 


high for symbol period if symbol is odd number in frame 
(as determined from scattered pilot phase) 


c_reference_seq 


Reference sequence output to TPS Sequence block 


freq_sweep[2:0] 


Frequency Sweep control; incrementing 3-bit count which 
increments IQ Demodulator LO offset in Frequency and 
Sampling block. Sweeps 0-0.875 carrier spacing offset in 
0.125 carrier spacing steps 



Table 19 



Address (Hex) 


Bit No. 


Dir/Reset 


Register 
Name 


Description 


0x32- 
0x33 


15 


R/W/0 


set_carrier_0 


Set to 1 to use 
carrier_0 value 
as setting 


11:0 


R/W/0 


carner_0 


Carrier 0 posi- 
tion 


0x36 


7:0 


R/W/ 


csi__thresh 


Channel State 
Information 
threshold - the 
fraction of 
mean level 
below which 
data carriers 
are marked by 
a bad_carrier 
flag. Nominally 
0.2 (for 2/3 
code rate). A 
value of 0 
would turn CSI 
off for compar- 
ison testing. 


0x37 


7:0 









Table 20 
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Signal 


Description 


clk40M 


40MHz clock (2x sannple clock) 


cLdata[11:0] 


corrected pilot data from Channel Estimation and Correc- 
tion (only need 1 data because corrected pilots should only 
insignificant Im component; - only need sign bit) 


tps_pilot 


high for single clock cycle when data input is a tps_pilot - 
use like a valid signal. 


reference_seq 


Reference Sequence PRBS input from Channel Estimation 
& Correction - ignore for non-tps_pilot values 


c_symbol 


timing pulse high for 1 clock cycle for first carrier in new 
symbol (whether or not that carrier is active) 


lupdata[7:0] (bi-di) 


Internal Microprocessor Databus 


upaddr[1:0l 


Internal uP address bus (only 2-bits required) 


upwstr 


Internal uP write strobe 


uprstr 


Internal uP read strobe 


upsel 


Internal address decode output; high for addresses 
0x10-0x13 


Table 21 


Signal 


Description 


tps_data [29:0] 


Output tps data (held static for 1 OFDM frame): 
tps_data[1:0] = frame number 
tps_data[3:2] = constellation 
tps_data[6:4] = hierarchy 
tps_data[9:7] = code rate, HP stream 
tps_data[12:10] = code rate, LP stream 
tps_data[14:13] = guard interval 
tps_data[16:15] = transmission mode 
tps data[29: 1 7] = future use bits 

Note that parameters are transmitted for the next frame; 
outputs should be double-buffered so parameters appear at 
block outputs in the correct frame (used by Demapper and 
Symbol/Bit deinterleave blocks to decode incoming data) 


tps_sync 


Status output from Frame Sync FSM - set to 1 when FSM 
is sync'd i.e when 2 valid sync words have been received in 
expected postions AND correct TPS data is available at the 
block outputs. 



Table 22 



OxIO-Ox 
13 


TPS Data (includinc 


) future use bits) 


1:0 


R/0 


tps_frame 


Number of last received com- 
plete OFDM frame in superframe 
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TPS Data (including future use bits) 



OxIO-Ox 
— 



3:2 



7:5 



10:8 



13:11 



15:14 



17:16 



31:19 



R/0 



R/0 



R/0 



R/0 



R/0 



R/0 



R/0 



tps_constellation 



tps_aipha 



tps_hp_rate 



tpsjp_rate 



tps_guardjnt 



tps_tx_mode 



tps_future 



Constellation Pattern from TPS 
data 



Hierarchical Transmission Infor- 
mation 



Viterbi Code Rate of 
High-Priority stream (In 
non-hierarchical mode this is the 
code rate of the entire stream) 



Viterbi Code Rate of Low-Pnority 
stream 



Guard Interval 



Transmission Mode 



Undefined bits allocated for fu- 



Table 23 


Signal 


Description 


clk40M 


40MH2 clock (2x sample clock) 


nrst 


Active low reset 


us_pilot 


input data valid signal; high when a scattered pilot is 
output from the Channel Estimation & Correction block 


guard[1:0] 


Guard Interval from which symbol period Tt can be 
deduced:00 = 1/32 (Tt = 231us) . 01 = 1/16 (238us). 10 = 
1/8 (252us) ,11 = 1/4 (280us) 


ui data[11:0], 
uq_data[11:0] 


input data from Channel Estimation & Correction (Uncor- 
rected spectrum) 


u_symbol 


Symbol timing pulse from Channel Estimation & Correc- 
tion; high for first valid data value of a new symbol (uncor- 
rected spectrum) 


resync 


Resynchronization input triggered on e.g. channel 
change. Pulsed high to indicate return to acquisition mode 
(wait for first symbol pulse after resync before beginning 
Pilot search) 


sr_sweep[3:0] 


Sampling Rate Sweep control from FFT Window block; 0 

= OHz offset, 1=+500H2, 2=-500Hz,3=+1000H2, 

4=.1000Hz,5=+1500Hz,6=-1500Hz,7=+2000Hz,8=-2000H 
z 


freq_sweep[3:0] 


Frequency Sweep control from Channel Estimation & 
Correction block; represents number n range 0-7 fre- 
quency offset = nxSOOHz 
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Signal 


Description 


lupdata[7:0] (bi-di) 


Internal Microprocessor Databus 


upaddr[3:0] 


Internal uP address bus (only 4-bit required) 


upwstr 


Internal uP write strobe 


uprstr 


Internal uP read strobe 


upsell 


Internal address decode output; high for addresses OxOe- 
OxOf 


upsel2 


Address decode for addresses in range 0x24-0x2d 


Table 24 


Signal 


Description 


frequency_error 


frequecy error output (to IQ Demod) 


sannpling_rate_error 


Sampling Rate Error output (to Sine Interpolator) 


freq_lock 


status output; high if frequency error low 


sarriDle lock 


status output; high if sampling rate error low 



Table 25 



Address (Hex) 


Bit No. 


Dir/Reset 


Register 
Name 


Description 


OxOe- 
OxOf 


11:0 


R/0 


freq^error 


IQ Demodu- 
lator Fre- 
quency Error 
(from feed- 
back loop) 



Table 26 



Address (Hex) 


Bit No. 


Dir/Re- 
set 


Register Name 


Description 


0x24- 
0x25 


15 


R/W/0 


freq_open 


Set to 1 to break freq 
control loop 


14 


R/W/0 


freq^nogi 


Set to 1 to allow fre- 
quency update anytime, 
not just during Guard 
Interval 


11:0 


R/W/0 


freq_twiddle 


IQ Demod twiddle factor 


0x26- 
0x27 






freq_loop_bw 


Frequency Control Loop 
parameters 


0x28- 
0x29 


15 


R/W/0 


sample_open 


Set to 1 to break sample 
control loop 
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Address (Hex) 


Bit No. 


Dir/Re- 
set 


Register Name 


Description 




14 


R/W/0 


sample_nogi 


Set to 1 to .allow sample 
update anythime,.not 
just during Guard Inter- 
val 




11:0 


R/W/0 


sample_twiddle 


Sampling Rate Twiddle 
factor 


0x2a- 
0x2b 




R/W/0 


sample Joop^bw 


Sampling Rate Control 
Loop parameters 


0x2c- 
0x2d 


11:0 


R/0 


sampling_rate_err 


Sampling Rate Error 
(from feedback loop) 



Signal 


DescriDtion 


clk40M 


40MH2 clock (2x sample clock) 


validjn 


input data valid signal; when valid is low, input data 
should be ignored 


i_data[1 1 :0], q_data[1 1 :0] 


input data from Channel Estimation & Correction. 


bad__carrierjn 


Carrier Status falg - set if carrier falls below accept- 
able level; indicates to viterbi that data from this ear- 
ner should be discarded from error correction calcu- 
lations. 


c_symbol 


Timing synchronization signal - high for the first data 
sample in the corrected COFDM symbol. 


constellation[1:0] 


control signal which defines constellation* 00 = 
QPSK, 01 = 16-QAM, 10 = 64-QAM 


alpha[2:0] 


control signal defining hierarchical transmission pa- 
rameter, alpha: 000 = non-hierarchical transmission, 
001 = alpha value of 1, 010 = alpha value of 2, Oil = 
alpha value of 4 (Note the first release of the chip will 
not support hierarchical transmission) 



Signal 


Description 


out_data[11:0] 


deinterleaved output data 6 1, 6 Q format 


bad^carrier 


bad^carrier flag carried through demap process un- 
changed. 


valid 


Valid output data indicator; high if data is being output on 
this clock cycle 
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Signal 


Description 


d symbol 


Symbol timing pulse re-timed to synchronize with out_data 


Table 29 


Signal 


Description 


clk40M 


40MHz clock (2x sample clock) 


validjn 


input data valid signal; when valid is low, input data should 
be ignored 


demap_data[1 1:0] 


input data from Demapper. Data is in 6-bit 1, 6-bit Q format 
(for 64_QAM) 


bad_carrier_in 


Garner status signal - set if earner falls below limits; indi- 
cates to viterbi that data should be ignored. Carried with 
data as extra bit through deinterleaver store. 


symbol 


Timing synchronization signal - high for the first data sam- 
ple in a COFDM symbol. Used to resynchronize address 
generation 


carrierO 


Timing pulse - high for the first active carrier (correspond- 
ing to carrier index value of 0) in a symbol 


odd^symbol 


high if symbol is odd number in the frame (different inter- 
leaving pattern in odd and even symbols within 68-symbol 
frame) 


Table 30 


Signal 


Description 


out_data[11:0] 


deinterleaved output data coded constellation format 


bad__carrier 


Bad carrier output having passed through deinterleave 
RAM. 


valid 


Valid output data indicator; high if data is being output on 
this clock cycle 


d_symbol 


Output timing synchronization signal - high for first data 
sample in de-interleaved COFDM symbol. 


Table 31 


Signal 


Description 


clk40M 


40MHz clock (2x sample clock) 


validjn 


input data valid signal; when valid is low, input data 
should be ignored. Valid "spread out" to smooth out data 
rate over whole symbol - average of 1 data valid every six 
40MHz cycles. Effective data rate at viterbi input dropped 
to 20MHz 


sdi_data[11:0] 


input data from Symbol Deinterleaver, Data is in 6-bit 1, 
6-bit Q format (for 64_QAM) 
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Signal 


Description 


bad_carrier 


Set to 1 if a carrier conveying the data fell below 
cceptable limits; indicates to Viterbi that this data should 
be ignored 


symbol 


Timing synchronization signal - high for the first data 
sample in a COFDM symbol. Used to resynchronize ad- 
dress generation 


constellation[1:0] 


Constellation Type indicator: 10 = 64-QAM01 = 16-QAMOO 
= QPSK 


alpha[2:0] 


Hierarchical transmission control:000 = non-hierarchical, 
001 = alpha value 1, 010 = alpha value 2, Oil = alpha 
value 4(Note: in this first version of the device only 
non-hierarchical mode is supported) 


Table 32 


Signal 


Description 


l-data[2:0] 


i soft-bit to Viterbi 


discard-l 


flag bit drived from bad_carrier signal; viterbi will ignore 
this soft-bit if set. (bad-carrier is repeated per soft-bit be- 
cause of interleaving) 


Q-data[2:0] 


Q soft-bit to Viterbi 


discard-Q 


flag-bit; Viterbi will ignore this soft-bit if set 


valid 


Valid output data indicator; high if data is being output on 
this clock cycle 


t able 33 


Signal 


Descriotion 


MD[7;0] (bi-di) 


Microprocessor Data bus (bi-directional) 


MA[5:0] 


Microprocessor Address Bus 


MR/W 


Microprocessor Read / Write control 


SCL 


Serial Interface Clock 


SDA(bi-di) 


Serial Interface Data I/O (bi-directional - same pin as 
MD[0]) 


SADDR[2:0] 


Serial Interface Address 


S/P 


Serial/Parallel interface select 


Table 34 


Signal 


Description 


nupdata[7:0] (bi-di) 


Internal processor data bus (inverted) (bi-directional) 
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Signal 


Description 


upaddr[5:0] 


Internal address bus (decoded to provide individual se- 
lects for various register banks within functional blocks) 


upgrstr 


Internal read strobe 


upgwstr 


Internal write strobe 


IRQ 


Interrupt Request (Active low, open collector) 


Table 35 


Signal 


Description 


pad_clk40 


Uncontrolled 40MHz clock from input pad 


lupdata[7:0] (bi-di) 


Internal Microprocessor Data bus (bi-directional) 


upaddr[3:0] 


Internal Microprocessor Address Bus (only bits relevant to 
registers within System Control) 


uprstr 


Internal Microprocessor Read strobe 


upwstr 


Internal Microprocessor Write Strobe 


upseH 


block select decoded from microprocessor interface (1 = 
access to this block enabled) valid for addresses 
OxOO-OxOb 


upsel2 


address decode for 0x38-0x39 range 


tps_data[10:0] 


TPS data received in OFDM frame (1:0 = 
tps_consteilation; 4:2 = tps_alpha7:5 = tps__hp_rate10:8 = 
tps_lp_rate)(Don't bother with Guard Inten/al - these 
parameters only affect back end blocks) 


rs_correct[5:0] 


Count of bits corrected in each RS packet (accumulated 


rs corr val 


\/alici nuisp* hinh wh^^n f^nrrpct valuf^ valiri 

VCtllVat ^UiOw, lltMII V V 1 i w il lO V^VJIIwwi VClliJ C 1 0 V 0 1 1 u 


pkt_err 


Set to 1 to indicate RS packet is uncorrectable; has >64 
bit errors or is corrupted in some other way; 


err_val 


Set to 1 to indicate when pkt_err signal is valid 


vitjll_state 


ViterbiJIIegal state pulse; (accumulate to give Viterbi 
illegal state count) 


vitjll_val 


NOW NOT REQUIRED - Viterbi illegal state valid pulse 


vit_sync 


Status signal - 1 if Viterbi is synchronized 


tps^sync 


Status signal - 1 if TPS is synchronized 


pilotjoc 


Status signal - 1 if pilot location completed successfully 
(found_pilots)) 


fft_loc 


Status signal - 1 if FFT window has located correctly 


vit_rate[2;0] 


Received Viterbi puncture rate. 
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Signal 


Description 


tck 


JTAG test clock - used for control of clock in test mode 


njreset 


JTAG test reset - for clock control block 


jshift 


JTAG test register shift control - for clock control block 


j_ctrl_in 


JTAG test data input 


Table 36 


Signal 


Description 


clk40 


Test-controlled main clock 


clk20 


Test-controlled sample clock (input to IQ Demod and 
AGC) 


lupdata[7:0] (bi-di) 


Internal processor data bus (bi-directional) 




Active Low interrupt request bit (derived from chip_event) 


uuribLc;liaiiCjn[ 1 .UJ 


Internal address bus (decoded to provide individual se- 
lects for various register banks within functional blocks) 


alpha[2:0] 


Hierarchical mode information 


hp_rate[2:0] 


Viterbi code rate for High Priority channel (in 
non-hierarchical mode this is the code rate for the com- 
plete channel) 


lp_rate[2:0] 


Viterbi code rate for Low Priority channel. 


upLtx_nriode[1 :0] 


Transmission mode (2K or 8K) 


upi_guard[1:0] 


Guard Interval 


rxp_valid 


Set to 1 if Host Interfarp hp<5 QP^f rv nara Hata 1 icoH ae o 

"valid" signal for rx para data (in case of TPS data use 
tps_sync) 


o_clk_phase 


Control line; set to 1 to invert output clock phase 


xtc[2:0] 


External Tuner Control bits 


i2c_gate 


I2C "Gate" control 


tsjri 


Transport Stream Interface tristate control 


soft_reset 


Software Reset (set to 1 to reset everything except upi) 


agcjnvert 


Control line: set to 1 to invert sense of AGC sigma-delta 
output (default: low output equates to low AGC gain) 


agc_resync 


Control line: When set low AGC held in initial condition. 
Resync transitioning high commences the AGC acquisi- ' 
tion sequence 
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Signal 


Description 


fft_resync 


Control line: hold low to re-initialise FFT, Channel Estinna- 
tion & Correction Freauenrv/J^pmnllnn Frrnr and TP^ 
blocks. Transition high comnnences FFT window locate, 
Pilot locate and TPS synchronisation. 


viterbi_resync 


Contol line; hold low to re-initiliase FEC backend. Transi- 
tion high connmences Viterbi synchronisation. 


j_ctrLout 


JTAG test data output - from clock control block. 



MUUI coo 

(Hex) 


Bit No. 


Dir/Reset 


Register Name 


Description 


0x00 


Event Reg. 




0 


R/W/0 


chip^event 


OR of all events which 
are interrupt-enabled 
(unmasked) 




1 


R/W/0 


lock_failed_event 


Set to 1 if channel ac- 
quisition sequence fails 




2 


R/W/0 


rs_overload_event 


Set to 1 if 

Reed-Solomon Decoder 
exceeds set threshold 
within one 1 second pe- 
riod 


0x01 


Mask Reg. 




0 


R/W/0 


chip_mask 


Set to 1 to enable IRQ 
output 




1 


R/W/0 


lock_failed_mask 


Set to 1 to enable inter- 
rupt on channel acquisi- 
tion fail 




2 


R/W/0 


rs_overload_mask 


Set to 1 to enable inter- 
rupt on RS error thresh- 
old exceeded 


0x02 


Status Reg. 




0 


R/0 


systemjocked 


Set to 1 when system 
acquired channel suc- 
cessfully 




1 


R/0 


viterbi_sync 


Set to 1 when Viterbi is 
synchronized 




2 


R/0 


tps_sync 


Set to 1 when OFDM 
frame carrying TPS data 
has been synchronized 
to. 
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Auaress 
(Hex) 


Dit (VJO. 


Dir/Reset 


Register Name 


Description 




3 


RJO 


pilotjoc 


Set to 1 when .pilots in 
COFDM synnbol have 
been located and syn- 
chronized to 


• 


A 
H 


R/0 


fft_loc 


Set to 1 when guard 
interval has been lo- 
cated and synchronized 
to. 




7:5 


R/1 


viterbi_rate 


Received Viterbi Code 
rate 


UXU4-UXU 

5 


Control Reg: 




0 


R/W/0 


change_channel 


When set to 1 . holds 
device in "Reset" state. 
Clearing this bit initiates 
channel change. 




1 


RM//0 


agc_invert 


Invert AGO Signa-Delta 
output. Default setting 
means low output asso- 
ciated with reduced 
AGC gain. 




2 


R/W/0 


o_cik_phase 


Set to 1 to invert phase 
of output clock. Default 
condition: output data 
changes on falling edge 
of output clock. 




3 


R/W/0 


set_rx_parameters 


Set to 1 to take Reciver 
Parameter Data from 
Receiver Parameter 
Register. Default condi- 
tion: settings taken from 
TPS data (longer chan- 
nel acquisition time) 




4 


R/W/0 


extend_agc 


Set to 1 to hold acquisi- 
tion sequence in 
agc_acquire state 




5 


R/W/0 


extend_fs 


Set to 1 to hold acquisi- 
tion sequence in 
fs_acquire state 




6 


R/W/0 


extend_settle 


Set to 1 to hold acquisi- 
tion sequence in 
fs_settle state | 
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Address 
(Hex) 


Bit No. 


Dir/Reset 


Register Name 


Description 




7 


R/W/0 


extend_syn 


When set to Ito hold 
acquisition sequence in 
vit_sync state 




10:8 


R/W/0 


xtc 


External Tuner Control 
bits (external pins 
XTC[2:0]) 




11 


R/W/0 


i2c_gate 


I2C "Gate" signal; set- 
ting this to 1 enables the 
isolation buffer between 
the "processor side" I2C 
bus and the "Tuner side" 
I2C so the processor 
can acces a Tuner 
through COFDM device. 
Setting to 0 closes the 
"gate" to prevent 12C 
bus noise affecting deli- 
cate RF. 




12 


R/W/0 


tsjri 


Transport Stream 
Tristate control - set to 1 
to tristate MPEG TS in- 
terface (eg. to mux a 
QPSK devce to same 
MPEG demux). 
Power-on state of TS 
output controlled by ex- 
ternal pin - somehow!!! 




13 


R/W/0 


fast_ber 


Set to 1 to reduce BER 
counter, vitjll_state 
counter and 
rso^counter, counter 
periods from 1 sec to 
100ms 




15 


R/W/0 


soft_reset 


Software Reset - set to 
1 to reset all blocks ex- 
cept upi. Set to 0 to re- 
lease. 


0x06-0x0 
7 


Receiver Parameter Register: 




15:14 


R/W/2 


upi_constellation 


Constellation Pattern for 
Demapper and Bit 
Deinterleaver (reset con- 
dition = 64-QAM) 




13:12 


R/W/0 


upi^guard 


Guard Interval: 00 = 
1/32, 01 = 1/16. 10 = 
1/8. 11=1/4 
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(Hex) 


Rit Nr> 


uir/Keset 


Register Name 


Description 




11:9 


R/W/0 


upi_alpha 


Hierarchical Tranmission 
Mode or "alpha value" 
(reset condition = 
non-hierarchical mode) 




7:5 


R/W/0 


iini hn rsto 


viterbi Code Rate for HP 
stream - in 

non-hierarchical mode 
this is taken as the 
Viterbi Code Rate (reset 
condition = 1/2 rate 
code) 






KAA//0 


upL'P.^'ate 


Viterbi Code Rate for LP 
stream (reset condition 
= 1/2 rate code) 




1 .u 


KAA//0 


upi_tx_mode 


Trnnsmission mode 
(00=2K. 01=8K, others 
reserved) 


0x08 


7:0 


R/W/0 


rsojimit 


Errored packet per sec- 
ond limit (for 
rs__overload event bit) 


0x09 


7:0 


R/0 


rso^count 


Count of Uncorrectable 
Transport Packets per 
second (saturates at 
255).Write to register to 
latch a stable count 
value which can then be 
read back. 


OxOa 
- OxOb 


15:0 


R/0 


ber 


BER (before RS) de- 
duced from RS correc- 
tions in 1 second period 
- max correctable bit 
errors -1 .35M/sec for 
7/8. 64-QAM. 1/32 Gl 
(equivalent to 43.e-3 
BER assuming useful 
bitrate of 31.67 e6). 
Only top 16 bits of 21 bit 
counter are visible - res- 
olution of — 1e-6 denpnd- 
ing on code-rate, con- 
stellation Gl length. 
Write to register to latch 
a stable count value 
which can then be read 
back. 



Table 38 
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0x38-0x39 


11:0 


R/0 


V!tJII_states 


Viterbi Illegal State Rate 










(per second) Write to 










register to latch count 










which can then be read 










back 



Table 39 
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Listing 1 

// Sccsid: %W% %G% 



Copyright (c) 1997 Pioneer Digital Design Centre Limited 
Author : Dawood Alam. 

Description: Verilog code for butterfly processor BF2I. (RTL) 
Notes : Computes first stage in radix 4 calculation. 



■ 

'timescale Ins / lOOps 

module fft_bf2l (elk, enable_1. in_x1r, in_x1i. in x2r. in x2i in s 
out_z1r, out_2li, out_z2r. out_22i. out_ovf): - • 

parameter wordlength = 5; // Data wordlength. 

input elk, // Master clock. 

enable_1 , // Enable on clock 3. 

•n_s; // Control line, 

input [wordlength-1 -.0] in_x1 r. // input I from memory 

in_x1 i, // Input Q from memory 

in_x2r, //Input I stage n-1. 

in_x2i; // Input Q stage n-1 . 

output out_ovf; // Overflow flag 
output [wordlength-1 :0] out_z1 r, // Output I to stage n+1 
out_z1 i. // Output Q to stage n+1 

out_z2r. // Output I to memory. 

out_z2i; // Output Q to memory. 

wire [wordlength-1 :0] in_x1r, 
in_x1i, 

in_x2r. 

in_x2i. 
out_z1r, 

out_z1i, 

out_z2r, 

out_z2i: 
wire in_s. 

enable_1 , 
out_ovf; 

reg [wordlength-1 :0] z1r_tmp1, 
z1i_tmp1. 

22rjmp1, 

z2i_tmp1. 
z1 r_tmp2, 

z1i_tmp2, 

z2r_tmp2. 
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z2Ltmp2; 
reg ovMmp. 
ovMmpO. 
ovf_tmp1, 
5 ovf_tmp2. 

ovf_tmp3. 
ex^regO, 
ex_reg1, 
ex_reg2. 

10 ex_reg3; 

always @(in_s or in_x1r or in_x1 i or in_x2r or in_x2i) 
begin 

{ex_regO,z1r_tmp1} = in_x1r + in_x2r; 
15 ovMmpO = in_x1r[wordlength-1] && // Overflow check. 

in_x2r[wordlength-1] && 

-z1r_tmp1(wordlength-1] || 
--in_x1 r[wordlength-1] && 
--in_x2r[wordlength-1] && 
20 z1r_tmp1[wordlength-1]; 

if (ovf_tmpO) // Saturate logic. 

2lr_tmp1 = (ex_regO) ? {rb1.{wordlength-1{rbO}}} : 
{rbO.{wordlength-1{rb1}}}; 

25 {ex_reg1 ,z1 i_tmp1} = jn_x1 i + in_x2i; 

ovf_tmp1 = in_x1i[wordiength-1] && // Overflow check. 

in_x2i[wordlength-1] && 
-'Zli_tmp1[wordlength-1] || 
-•in_x1i[wordlength-1] && 
30 -in_x2i{wordlength-1 ] && 

z1 i_tmp 1 [wordlength-1 ]; 
if (ovf__tmp1 ) // Saturate logic. 

z1i_tmp1 = (ex_reg1) ? {Vbl, {wordlength-1 {I'bO}}} : 
{rbO.{wordlength-1{rb1}}}; 

35 

{ex_reg2,z2r_tmp1} = in_x1r - in_x2r; 

ovf_tmp2 = in_x1r[wordlength-1] && // Overflow check. 

-'in_x2r[wordlength-1] && 
--z2r_tnnp1 [wordlength-1 1 H 
40 ^in_x1 r(wordlength-1] && 

in_x2rtwordlength-1] && 
z2r_tmp1 [wordlength-1]; 
if (ovf_tmp2) // Saturate logic. 

z2r_tnnp1 = (ex_reg2) ? {I'bl, {wordlength-1 {rbO}}} : 
45 {rbO,{wordlength-1{rb1}}}; 

{ex_reg3,z2i_tmp1} = in_xii - in_x2i; 

ovf_tmp3 = in_x1i[wordtength-1] && // Overflow check. 

'-in_x2i[wordlength-1] && 
50 --z2i_tmp1 [wordlength-1] i| 

Hn_x1i[wordlength-1] && 
in_x2i[wordlength-1] && 
z2i_tnnp1 [wordlength-1 ]; 
if (ovf_tmp3) // Saturate logic. 

55 z2i_tnnp1 = (ex_reg3) ? {I'bl, {wordlength-1 {TbO}}} : 
{1 •bO.{wordlength-1 {1 'bl }}}; 
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// Output Stage with two channel mux 
if (!in_s) 

begin: mux_passthru 
5 z1r_tmp2 = in_x1r; 

z1i_tmp2 = in_x1i; 

22r_tmp2 = in_x2r; 

z2i_tmp2 = in_x2i; 
end 

1 0 else 

begin: mux_computing 
z1r_tmp2 = 2lr_tmp1; 
z1i_tmp2 = 2li_tmp1; 
z2r_tmp2 = z2r_tmp1 ; 
1 5 z2i_tmp2 = z2i_tmp1 ; 

end 
end 



assign out_z1r = z1r_tmp2; 
20 assign out_z1 i = z1 i_tmp2: 
assign out_z2r = z2r_tmp2; 
assign out_z2i = z2i_tmp2; 

always @(posedge elk) 
25 if (enable_1 ) // Butterfly completes at the end of clock cycle 0 

ovf.tmp <= in_s && (ovf_tmp0 1 1 ovf_tmp1 i | ovf_tmp2 1 1 ovf_tmp3); 

assign out_ovf = ovf_tmp; 

30 'ifdef OVERFL0W_DEBUG_LOW_LEVEL 

// Debug code to display overflow output of a particular adder 
//Concurrently monitor overflow flag and halt on overflow 
1f7ov? tmp)^~ "^'^ °'" °'" ovf.tmp 1 or ovf_tmp2 or ovf_tmp3) 

35 begin" 

if (ovf tmpO) $display("ovf_tmpO on BF2I = ".ovf tmpO)- 
If (ovf_tmp1) $display("ovf_tmp1 on BF2I = ".ovf~tmp1 ' 
If (ovf_tmp2) $display("ovf_tmp2 on BF2I = ".ovf~tmp2)' 
I; (ovf_tmp3) $display("ovf_tmp3 on BF2I = ".ovf"tmp3)' 
40 $stop; — r- /. 

end 
'endif 
endmoduie 

45 

Listing 2 

// SccsId: %W% %G% 

— . — 

5° Copyright (c) 1997 Pioneer Digital Design Centre Limited 

Author : Dawood Alam. 

Description: Verilog code for butterfly processor BF2II. (RTL) 
Notes : Computes second stage in radix 4 calculation. 
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'timescale Ins / 100ps 

5 module fft_bf2ll (elk, enable_1, in_x1r, in_x1i, in_x2r, in_x2i. in s in t 
out_z1r, out_2li. out_22r, out_z2i. out_ovf); ~ ' 

parameter wordlength = 5; // Data wordlength. 

10 input elk, // Master clock. 

enable_1 . // Enable on clock 3. 

in_s, // Control line. 

in_t; // Control line, 

input [wordlength-1 :0] in_x1 r. // Input I from memory. 

15 in_x1i, // Input Q from memory. 

in_x2r, // Input I stage n-1 . 

In_x2i; // Input Q stage n-1 . 

output out_ovf; // Overflow flag. 
20 output [wordlength-1 :0] out_z1 r. // Output I to stage n+1 
out_z1 i, // Output Q to stage n+1 
out_z2r. // Output I to memory. 
out_z2l; // Output Q to memory. 

25 wire [wordlength-1 :0] in_x1r, 
in_x1i, 
in_x2r. 
in_x2i, 
out_z1r, 
30 out_2li. 

out_z2r. 
out_z2i; 
wire in_s, 
in_t, 

35 enable_1 , 

out_ovf, 
control; 

reg [wordlength-1 :0] z1 r_tmp1 , 
40 z1i_tmp1, 
z2r_tmp1 , 
z2i_tmp1 , 
z1r_tmp2. 
z1 i_tmp2, 
45 z2r_tmp2, 
z2i_tmp2. 
x2ri_tmp1, 
x2ri_tmp2; 
reg ovf_tmp. 
50 ovf_tmpO, 
ovf_tmp1 , 
ovf_tmp2, 
ovf_tmp3, 
ex_regO, 
55 ex_reg1, 
ex_reg2, 
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ex_reg3; 
assign control = in_s && !in_t; 

5 always @(in_s or control or in_x1 r or in_x1 i or in x2r or in x2i) 
begin ~ — ' 

// Crosspoint switch, used in connputing complex i values 
if (control) o r- J 

begin: switch_crossed 
10 x2ri_tmp1 = in_x2i; // 1 -> r. 
x2ri_tmp2 = in_x2r; // r -> i. 
end 
else 

begin: switch_thru 
15 x2ri_tmp1 = in_x2n // r -> r. 
x2ri_tmp2 = in_x2i; // i -> i. 
end 

{ex regO.zlrJmpI} = in_x1r + x2ri_tmp1 ; 
20 ovf_tmpO = in x1r[wordlength-1]&& // Overflow check 

x2ri_tmp1[wordlength-1] && 
~z1 r_tmp1 [wordlength-1] 1 1 
~in_x1r[wordlength-1] && 
--x2ri_tmp1 [wordlength-1] && 
25 z1r_tmp1 [wordlength-1]; 

If (ovfJmpO) // Saturate logic. 

z1r_tmp1 = (ex_regO) ? {I'bl, {wordlength-1 {I'bO}}} : 
{rbO.{wordlength-1{rb1}}}; 

30 {ex regl z1i_tmp1} = (control) ? in_x1i - x2ri tmp2:ln xli + x2ri tmp2- 
ovf tmpi = in x1i[wordlength-1] && //"Overflow check 

(control x2ri_tmp2[wordlength-1]) && // Deals with a 

~z1 i_tmp1[wordiength-1] 1 1 // +/. input 
~in_x1 i[wordlength-1 J && 
35 -(control x2ri_tmp2[wordlength-1]) && 

z1 i_tmp1 [wordlength-1 1: 
if(ovf_tmp1) // Saturate logic. 

z1 i_tmp1 = (ex_reg1 ) ? {1 'b1 .{wordlength-1 {1 'bOm • 
{1*bO,{wordlength-1{rb1}}}; 

{ex reg2,z2r_tmp1} = in_x1 r - x2rLtmp1 ; 

ovf_tmp2 = in_x1 r[wordlength-1 ] && // Overflow check 

~x2ri_tmp1 [wordlength-1] && // Deals with a 

~z2r_tmp1 [wordlength-1] II //-input. 
45 ~in_x1r[wordlength-1] && 

x2ri_tmp 1 [wordlength-1 ] && 

z2r_tmp1 [wordlength-1]; 
If (ovf_tmp2) // Saturate logic 

z2r_tmp1 = (ex_reg2) ? {1 *b1 .{wordlength-1 {1 'bO}}} : 
50 {1 bO,{wordlength-1{rb1}}}; 

{ex reg3.z2i_tmp1} = (control) ? in_x1i + x2ri tmp2:in xli - x2ri tmD2- 
ovf jrnp3 = in x1 i[wordlength-1 ] && //Overflow-check 

-(control x2ri_tmp2(wordlength-1]) && // Deals with a 
55 -'Z2i_tmp1[wordlength-11 II //-/+ input 

~in_x1i(wordlength-1] && ' 
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(control x2ri_tmp2[wordlength-1]) && 
z2i_tmp 1 [wordlength- 1 ]; 
if (ovf_tmp3) // Saturate logic. 

z2i_tmp1 = (ex_reg3) ? {rb1.{wordlength-1{rbO}}} • 
5 {rbO,{wordlength-1{rb1}}}; 

// Output stage with two channel mux. 
if (!in_s) 

begin: mux_passthru 
10 z1r_tmp2 = in_x1r: 

z1i_tmp2 = in_x1i; 

z2r_tmp2 = x2ri_tmp1: 

z2i_tnnp2 = x2ri_tnnp2; 
end 

1 5 else 

begin: mux_computing 
z 1 r_tmp2 = z1 r_tmp 1 ; 
Zli_tmp2 = z1i_tmp1; 
z2r_tmp2 = z2r_tmp1; 
20 z2i_tmp2 = z2i_tmp1: 

end 
end 



25 



35 



assign out_2l r = z1 r_tnnp2; 
assign out_z1i = z1i_tmp2; 
assign out_z2r = 22r_tmp2; 
assign out_22i = z2i_tmp2; 



30 always @(posedge elk) 

if (enable_1 ) // Butterfly completes at the end of clock cycle 0. 
ovf_tmp <= in_s && (ovf_tmpO j | ovf_tmp1 [ | ovf_tmp2 ] | ovf_tmp3); 



assign out_ovf = ovf_tmp; 



*ifdef OVERFLOW_DEBUG_LOW_LEVEL 
// Debug code to display overflow output of a particular adder. 
// Concurrently monitor overflow flag and halt on overflow. 
40 always @(ovf_tmp or ovf_tmpO or ovftmpi or ovf tmp2 or ovf tmD3) 
if(ovf_tmp) ~ - r- / 

begin 

if (ovf_tmpO) $display("ovf_tmpO on BF2II = ",ovf_tmpO)- 
if (ovf_tmp1) $display("ovf_tmp1 on BF2II = ".ovf tmp1); 
45 if (ovf_tmp2) $displayrovf_tmp2 on BF2II = ".ovf~tmp2)- 

if (ovf_tmp3) $display("ovf_tmp3 on BF2II = ",ovf3mp3); 
$stop; 
end 
"endif 
50 endmodule 



Listing 3 

// Sccsid: %W% %G% 
55 * 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 
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Author : Dawood Alam. 

Description: Verilog code for a variable size ROM with complex data store 
(K I L; 

5 

Notes : Used to store complex Twiddle factors. 

1 0 "timescale 1 ns / 1 0Ops 

module fft_rom (elk, enable_3. address. rom_data); 

parameter c_wordlength = 1 ; // Coeff word length 
15 parameter rom_AddressSi2e = 1; //Address size 

parameter FILE = "../../../fft/src/lookup_tables/lu_10bit 2048pt scaleX"- 
// Lookup tab filename. (Listings 16, 17) 

input elk, 
20 enable_3; 

input [rom_AddressSize-1 :0] address; 

output [c_wordlength-1:0] rom_data; 

25 reg [c_wordlength*2-1:0] rom [0:(1 « rom AddressSize)-1]- 
reg [c_wordlength*2-1:0] b_tmp1. ~ 
rom_data; 

always ©(address) 
30 b_tmp1 = rom(address]; 

always @(posedge elk) 
if (enable_3) 
rom_data <= b_tmp1; 



35 



40 



initial 

$readmemb(FILE, rem); 
endmodule 

Listing 4 



// Secsid: %W% %G% 



45 Copyright (c) 1 997 Pioneer Digital Design Centre Limited 

Author : Dawood Alam. 

Description: Verilog code for variable length single bit shift register. 
Notes : Used to delay pipeline control signals by "length" clocks. 



55 'timescale 1ns / lOOps 
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module fft_sr_1bit (elk, enable_3. in_data, out_data); 

parameter length = 1 ; // Shift reg length. 

input elk, // Master clock; 

enable_3; // Enable on clock 3. 
input in_data; // Input data. 

output out_data; // Output data. 

reg shift_reg [!ength-1:0]; // Shift register. 



wire out_data; 
wire elk, 

15 enable_3; 
integer i; 

always @ (posedge elk) 
if (enable_3) 
20 begin 

for (i = (length-1); i >= 0;i = i-1) 
if(i==0) 

shift_reg[0] <= in_data; // Force input to SR. 
else 

25 shift_reg[i] <= shift_reg[i-1]; // Shift data once, 

end 



assign out_data = shift_reg[length-1]; 
endmodule 



Listing 5 



// Sccsid: %W% %G% 

******* ** * *** *** 

35 Copyright (c) 1997 Pioneer Digital Design Centre Limited 

Author : Dawood Alam. 

Description: Verilog code for a dual-port FIFO. (RTL) 



Notes : Used as a pipeline register to delay address into the address 
decoder. 



45 

'timescale Ins / lOOps 

module fft_sr_addr (elk, enable_3. in^data, out_data); 

50 parameter wordlength = 1; // Data wordlength l/Q. 
parameter length = 1 ; // Shift reg length. 

input elk, // Master clock; 

enable_3; // Enable on clock 3, 
55 input [wordlength-1:0] in_data; // SR input data. 

output [wordlength-1:0] out_data; // SR output data. 
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reg [wordlength-1:0] shift_reg [length-1 :0]: // Shift register. 

wire [wordlength-1:0] out_data; 
wire elk, 
5 enable_3: 
Integer i; 

always @ (posedge elk) 
if (enable_3) 
TO begin 

for (i = (length-1); i >= 0; i = i - 1) 
if(i==0) 

shift_reg[0] <= in_data; // Foree input to SR 
else 

1 5 shift_regli] <= shift_reg[i-1 ]; // Shift data once 

end 



20 



25 



assign out_data = shift_reg[length-1]; 
endmodule 

Listing 6 

// Scesid: %W% %G% 

r Copyright (e) 1997 Pioneer Digital Design Centre Ltd. 
Author : Dawood Alam. 

Deseription: Verilog code for an signed twiddle faetor multiplier. (RTL) 

30 Notes : Single multiplexed multiplier and 2 adders employed to 
perform 3 multiplies and 5 additions. Pipeline depth = 2 
ar/ai = Complex data, br/bi = Complex eoefficient 
bi +/- br eould be pre-caleulated in the ROM lookup however 
in this implementation it is NOT an overhead as this oath is 

35 shared by ar + ai. */ 

'timeseale Ins/ lOOps 

module fft_complex_mult_mux (elk. e2. in_ar. in ai. in br. in bi 
40 out_er. out_ci, out_ovf); ~ ~ ~ ' 

parameter wordlength = 12; // Data wordlength 
parameter c_word length = 10; // Coeff wordlength 
parameter mult_scale = 4; // multiplier scalling 
45 // 1 = /4096. 2 = /2048. 

//3 = /1024.4 = /512. 

input [wordlength-1:0] in_ar. // Data input I 
"n_ai; // Data input Q. 
50 input [c_wordlength-1 :0] in_br. // Coeffieient input I 
in_bi; // Coeffieient Input Q 
•nput elk; // Master elock 
input [1 :0] e2; // Two bit count line 

output out_ovf; // Overflow flag 
55 output [wordlength-1:0] out_er. // Data output I 
out_ci; // Data output Q 
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wire [wordlength-1:0] in_ar. 
in_ai. 

5 br_tmp, 
bMmp. 
out_cr, 
out_ci; 

wire [c_wordlength-1:0] in_br, 
10 in_bi; 

wire enable_0, 
enable_1 . 
enable_2. 
enable_3; 
15 wire [1:0] c2; 

reg [wordlength-1:0] in_ai_tmp. 
in_ar_tmp, 

abrjmp, 
20 abi_tmp. 

abri_tmp1. 

abri_tmp2. 

abri_tmp4. 

coeff_tmp1, 
25 nipy_tmp1, 

sum_tmpO. 

sum_tmp1. 

sum_tmp2, 

acc_tmp. 
30 store_tnnp, 

cr_tmp, 

ci_tmp; 

reg [wordlength*2-1;0] abri_tmp3, 
mpy_tmp2, 
35 coeff_tmp2; 
reg ovf_tmp0, 
ovf_tmp1. 
ovf_tmp2. 
ovf_tmp3, 
40 ex_reg0, 
ex_reg1. 
c1, c3. c4; 

// Enable signals for registers. 
45 assign enable_0 = ^c2[1] && -c2[0]: 
assign enable_1 = -c2[1] && c2(0]; 
assign enabie_2 = c2[1] && -c2[0]; 
assign enable_3 = c2[1] && c2[01; 

50 // Sign extend coefficients from c_wordlength bits to wordlength. 

assign br_tmp = {{(wordiength.c_wordlength){in_br(c_wordlength-1]}}.in_br}; 
assign bijmp = {{(wordlength-c_wordlength){in_bi[c_wordiength-1]}}Jn_bi}; 

// Combinational logic before pipeline register. 
55 always @(in_ar or br_tmp or in_ai or bi_tmp or c2) 
begin 
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c1 =c2[0] II c2[1]; 
c3 = c2[11; 

if (!c1) 
5 begin 

abr_tmp = in_ar; 
abi_tmp = in_ai; 
end 
else 
10 begin 

abr_tmp = br_tmp; 
abi_tmp = bi_tmp; 
end 

15 if(c3) 

{ex_reg0.abri_tmp4} = abi_tmp - abr tmp; 
else ~ 
{ex_reg0,abri_tmp4} = abi_tmp + abr_tmp; 

20 ovf tnipO = abi_tmp[wordlength.1 ] && // Overflow check 

(c3 abr_tmp(wordlength-1 ]) && // Deals with a 

-abri_tmp4[wordlength-1] 1 1 // +/- input 

-abi_tmp(wordlength-1] && 

~(c3 abr_tmp[wordiength-1]) && 
25 abri_tmp4[wordlength-1]; 

if(ovf_tmpO) // Saturate logic. 

abri_tmp1 = (ex_regO) ? {I'bl .{wordlength-1{rbO}}} • 
{1'bO.{wordlength-1{rb1}}}; 

30 else 

abri_tmp1 = abri_tmp4; 

end 

35 // Combinational logic after pipeline register. 

^begm -*"^P in_ai_tmp or br_tmp or c2 or store Jmp or abri_tmp2) 

c4 = c2[1]&&-c2[0]; 

40 case (c2) 
2'bOO: 
begin 

coeff_tmp1 = in_ar_tmp; 
sum_tmpO = store_tmp; 
45 end 
2'b01: 
begin 

coeff_tmp1 = br_tmp; 
sumJmpO = {wordlength-1 {1 'bO}}; 
50 end 
2'b10: 
begin 

coeff_tmp1 = in_ai_tmp; 
sum_tmpO = store_tmp; 
55 end 
2'b11: 
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begin 

coeff_tmp1 = in_ar__tmp; 
sum_tmpO = store_tmp; 
end 
endcase 

abriJmpS = {{wordlength{abrLtmp2[wordiength-1]}},abriJnrip2}; // extnd 
coeffJmp2 = {{wordlength{coeffJmp1[wordlength-1]}},coeff_tmp1};// extnd 
mpy_tmp2 = (abri_tmp3 * coeff_tmp2); 

nnpy_tmp1 = mpy_tmp2[wordlength*2-mult_scale:wordlength-(mult_scale-1 )]; 
if (c4) 

{ex_reg1.sumjnnp2} = sum_tnnp0-mpyjnnp1 - mpy_tmp2[wordlength-mult_scale]; 
else 

{ex_reg1 ,sum_tmp2} = mpy_tnnp1 + sum_tmpO + 
nnpy_tmp2[wordlength-mult_scale]; 

ovMmpI = (c4 mpy_tmp1[wordlength-1]) && // Overflow check. 
sum_tmpO[wordlength-1] && // Deals with a 
-sum_tmp2[wordlength-1] 1 1 // +/- input. 
-(c4 mpy_tmp1[wordlength-1]) && 
--sum^tmpOfwordlength-l] && 
sum_tnnp2[wordiength-1 ]; 
if {ovf_tmp1 ) // Saturate logic, 

sumjmpi = (ex_reg1) ? {rb1,{wordlength-1{rbO}}} : 
{rbO,{wordiength-1 {1 'bl }}}; 

else 

sum_tmp1 = sum_tmp2; 
end 

// Pipeline registers for l/Q data paths and intermediate registers, 
always @(posedge elk) 
begin 

if (enable_2) // Enable on 2nd clock. 
acc_tmp <= sum_tmp1; //Temp store. 

if (enabie_3) // Enable on 3rd clock. 
cr_tmp <= acc_tmp; // Pipeline reg cr 

if (enable_3) // Enable on 3rd clock. 
ci_tmp <= sum^tmpl; // Pipeline reg ci 

if(enable_1) 

store_tmp <= sum_tmp1 ; // Temp store, 
if (enable_2) 

in_ar_tmp <= in_ar; // Reg i/p to mpy. 
if(enable_1) 

in_ai_tmp <= in_ai; // Reg i/p to mpy. 

if (enable_0 1 1 enable_1 1 1 enable_2) 
abri_tmp2 <= abri_tmp1 ; // Pipeline reg. 

end 
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II Register ovf outputs before final OR. else whole complex multiplier is 

// if (enable_0 i | enable_1 1 1 enable 2) 
5 ovf_tmp2 <= ovf_tmpO; 

always @(posedge elk) 
ovf_tmp3 <= ovf_tmp1; 

10 assign out_ovf = ovfJmp2 1 1 ovf_tmp3; 

'ifdef OVERFLOW_DEBUG_LOW_LEVEL 
// Debug code to display overflow output of a particular adder 
//Concurrently monitor overflow flag and halt on overflow 
15 always @(posedge elk) 
If (out_ovf) 
begin 

if (ovf tmp2) $display("ovf_trnpO on complex multiplier = " ovf tmD2V 
20 SstopV""^^ $d.splay("ovf_tmp 1 on complex multiplier = ".ovfltmpS): 

end 
'else 
endif 

25 assign out_cr = cr_tmp; 
assign out_ci = ci_tmp; 



30 



40 



45 



endmodule 



// Sccsid: %W% %G% 
/** 



Listing 7 



35 Copyright (c) 1 997 Pioneer Digital Design Centre Limited 

Author : Dawood Alam. 



Description: Verilog code for a dual-port FIFO with complex data store. (RTL) 
"^"^cllcul^tiSJs ^'^'"^^^ ^^'"^ register for intermediate l/Q 

'timescale Ins/ lOOps 

module fft_srjq (elk. enable_3. in_xr. in_xi. out_xr, out_xi); 

^° 5or'«Ii;f If r wordlength = 1 ; // Data wordlength l/Q. 
parameter length = 1; // Shift reg length. 

input elk. // Master clock- 
cc .r ®'].fble_3; // Enable on clock 3 

55 input [wordlength-1:0] in_xr; // SR input data I 
in_xi; // SR input data. Q. 
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output [wordlength-1:0] out_xr. // SR output data 1. 
out_xi; // SR output data Q. 

reg [wordlength-1 :0] shifter [length-1 :0]; // SR for I data. 
5 reg [wordlength-1 :0] shiftj [length-1 :0]; // SR for Q data/ 

wire [wordlength-1 :0] out_xr, 

out_xi: 
wire elk. 
10 enable_3; 
integer i; 

always @ (posedge elk) 
if (enable_3) 
15 begin 

for (i = (length-1); i >= 0; i = i - 1) 
begin 
if(i==0) 
begin 

20 shift_r[0] <= in_xr; // Force input I to SR. 

shiftj[0] <= in^xi; // Force input Q to SR. 
end 
else 
begin 

25 shift_r[i] <= shift_r[i-li; // Shift data I once. 

shift J[i] <= shift J[i-1]; // Shift data Q once, 
end 
end 
end 

30 

assign out_xr = shift_r[length-1]; 
assign out_xi = shiftj[length-1]; 
endnnoduie 

35 Listing 8 

// Sccsid: %W% %G% 

********** ****** ******** ***** 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 

40 

Author : Dawood Alann. 

Description: Verilog code for 8 hardwired coefficients in a lookup table, of 
which 4 are unique values. 

45 

Notes : Used to store complex Twiddle factors. 8 point FFT twiddle factor 
coefficients (Radix 4+2). Coefficients stored as non-fractional 
10 bit integers. Real Coefficient (cosine value) is coefficient 
high-byte. Imaginary Coefficient (sine value) is coefficient 
50 low-byte. Coefficient addresses are delayed by a pipeline depth 

of 5, i.e. equivalent to case table values being advanced by 5. 

— * * *******************************^ 

55 'timescale Ins / lOOps 
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module fft_hardwiredJuO (elk. enable_3. address. out_br, out_bi); 

parameter c_wordlength = 10; // Coeff wordlenqth 
parameter rom_AddressSize = 3; // Address bus size 

5 

input elk, 

enable_3; 
input [rom_AddressSize-1:0] address: 

10 output [c_wordlength-l:0] out_br, out_bi; 

reg [e_wordlength*2-1:0] b_tmp1. 
b_tmp2; 

15 always ©(address) 
ease (address) 



20 



40 



55 



3*d6: b_tmp1 = 2G'bO000OOOOOO 1000000000- // W2 8 = +0 nnnnnn ^ nnnnnn 
3'dQ: b tmp1 = 20'b0101 101010110100101 lo! wM = to jOTWT ^O WTWJ 
3'd2: b tmp1 = 20'b10100101 lOHOIOOIO1 10 // WS'S = -Q 'tOTW? -StSjiSt 
endcase - ^ ^ ^ ^ ^ ^ ^ ^ 1.0000000000;// WO 8 = +1 000000 -0 000^^^^ 



always @(posedge elk) 
if (enable_3) 
25 b_tmp2 <= b_tmp1; 

assign outbr = b_tmp2[e_wordlength*2-1:c wordlenqthV 
assign out_bi = b_tmp2[c_wordlength-1 :0]: ~ 

30 endmodule 



Listing 9 

35 // Sccstd: %W% %G% 

. « 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 
Author : Dawood Alam. 



Deseription: Verilog eode for 32 hardwired eoefficients in a lookup table of 
which 16 are unique values. "ww^up iduie. ot 



A « f ^ . • complex Twiddle faetors. 32 point FFT twiddle 

45 faetor coeffieients (Radix 4+2). Coeffieients stored as 

rc°r;i2-'^*'°"fL-'^ u u* '"tesers. Real Coeffieient (eosine value) 
IS coefficient high-byte. Imaginary Coefficient (sine value) is 
coefficient low-byte. Coefficient addresses are delayed by a 

50 TaneedlS 4 *° """^ '""^ ""'"^^ ''^'"^ 



7 



"timescale Ins / lOOps 

module fft_hardwiredju1 (elk. enable_3. address. out_br. out_bi); 
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10 



parameter c_wordlength = 10; // Coeff word length, 
parameter rom_AddressSize = 5; // Address bus size. 

input elk. 

enable_3; 
input [rom_AddressSize-1 :0] address; 

output [c_wordlength-1:0] out_br, out_bi; 

reg [c_wordlength*2-1:0] b_tmp1, 
b_tmp2: 



always @(address) 
15 case (address) 
5'd5. 

5'd14:b_tmp1 = 20'b01 1 1 01 1001_1 1001 1 1 100;// W02_32 = +0.923880 -0.382683 
5'd6. 

5'd16:b_tmp1 = 20'b0101 101010_1010010110;// W04 32 = +0.707107 -0.707107 
20 5'd7. 

5'd18, 

5'd22:b_tmp1 = 20'b001 1 0001 00_1 0001 001 11;//W06_32 = +0.382683 -0.923880 
5"d8: b_tmp1 = 20'b0000000000_1 000000000;// W08_32 = +0.000000 -1.000000 
5'd9: b_tmp1 = 20'b1100111100_1000100111;//W10_32 = -0.382683 -0.923880 
25 5'dlO. 

5'd24:b_tmp1 = 20'b1 01 001 01 1 0_1 0 1 001 01 1 0;// W1 2_32 = -0.7071 07 -0.7071 07 
5'd1 1 :b_tmp1 = 20'b1 000 1001 1 1_11001 1 1 100;// W14_32 = -0.923880 -0.382683 
S'dl 3:b_tmp1 = 20*b01 1 1 1 101 10_1 1 1 001 1 100;// W01 32 = +0.980785 -0.1 95090 
5'd15. 

30 5'd21:b_tmp1 = 20'b01 10101010_1011 100100;// W03_32 = +0.831470-0.555570 
5'd17:b_tmp1 = 20'b0100011100_1001010110;// W05_32 = +0.555570-0.831470 
5"d19:b_tmp1 = 20'b0001 1 001 00_1 000001 01 0;//W07_32 = +0.195090 -0.980785 
5'd23:b_tmp1 = 20'b1 1 1001 1 100_1 000001 010;// W09_32 = -0.195090 -0.980785 
5'd25:b_tmp1 = 20'b1 000001 01 0_1 1 1 001 1 1 00;// W1 5_32 = -0.980785 -0. 1 95090 

35 5'd26:b_tmp1 = 20'b10001001 1 1_001 1000100;// W18_32 = -0.923880 +0.382683 
5'd27:b_tmp1 = 20'b101 1100100_01 10101010;// W21_32 = -0.555570 +0.831470 
default: b_tmp1 = 20'bO1 1111111 1_0000000000:// W00_32 = +1 .000000 -0.000000 
endease 

40 always @(posedge elk) 
if (enable_3) 
b_tmp2 <= b_tmp1; 

assign out_br = b_tmp2[e_wordlength*2-1 :c_wordlengthl; 
45 assign out_bi = b_tmp2[e_wordlength-1:0]; 

endmodule 

50 Listing 10 



55 



// Seesid: %W% %G% 



Copyright (c) 1997 Pioneer Digital Design Centre Limited 
Author : Dawood Alam. 
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35 



50 



55 
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Description: Verilog code for 128 hardwired coefficients in a lool<up table 
of wliich 64 are unique values. 'wwivup laoie, 

Notes : Used to store complex Twiddle factors. 128 point FFT twiddle 
factor coefficients (Radix 4+2). Coefficients stored as 
non-fractional 10 bit integers. Real Coefficient (cosine value) 

IfnoffiS?* '"H^"''^^- '']ia9*nafy Coefficient (sine value) is 
coefficient low-byte. Coefficient addresses are delayed by a 
pipeline depth of 3, i.e. equivalent to case table values being 



V 



1 5 ' timescale 1 ns / 1 0Ops 

module fft_hardwiredju2 (elk. enable_3. address. out_br. out_bi); 

parameter c_wordlength = 1 0; // Coeff wordlength 
20 parameter rom_AddressSize = 7; //Address bus size. 



input elk. 

enable_3; 
input [rom_AddressSi2e-1:0] address; 

output [c_wordlength-1 :0] out_br, out_bi; 

reg [c_wordlength*2-1:0] b_tmp1 
b_tmp2; 



always ©(address) 
case (address) 

7;d36:b_tmp1 =20'bO11111111l_iiiiiooi11; //W01_128=+0.998795 -0.049068 
Tdta'!'-"'^^ '^^'^^^ 11 11 1 1 10_1 1 1 1001 1 10: //W02_128=+0.995185 -0.098017 
7;d68!b_tmp1 =20'b01 1111 1010_1 1 101 10101 ; //W03_128=+0.989177 -0.146730 

Z!*^^®-'^-*'^P'' =20'b011 1110110 1110011100- //W04 128=+n Qftnyfte: n locnon 
40 7;d40:b_tmp1 =20'b01 1 1 1 lOOOlU 1 lOOOOlSSi /w6fclll=:o:9?O031 tllltto 

7'd4i. 

J.*3?S-u-"^P'' =20'b01 11 101010 1101101011- //W06 128=+0 956940 0 pqnpR'^ 

45 ^-*"^P^ =20'boi 1 1 10001011 101010100:' //JOSflilL+SllfMS -ofzello 

7'd44;''- "'^'^ 1 101 1001_1 1001 1 1 100: //W08_128=+0.923880 -0.382683 

7;d70;b_tmp1 =20'b01 1 1001 1 1 1_1 100100101 ; //W09_128=+0. 903989 -0.427555 

J.'515'u-*"^P'' =20'b01 11000100 1100001111; //W10 128=+0 881921 -0 471W 
7;d46:b_tmp1 =20'b01 101 101 1 HlOl 1 1 1 1001 ] //W1 i:?2l=+5:ll7?i9 -0 



514103 

7'd47. 

?2I2?-*'^P'^ =20'b01 10101010 1011100100; //W12 128=+0 831470 -0 SSWO 
7;d48:b_tmp1 =20'b01 1 001101 dO1 1001 mi //Xjl3:i2i=-.5:l53208 -§11^99 
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7'd49:b_tmp 
7'd50. 

7'd72:b_tmp 
7'd11. 
5 7'd51:b_tmp 
7*d52;b_tmp 
7*d12. 
7'd73. 

7'd53:b_tmp 
10 7'd54:b_tmp 
7'd13. 

7*d55:b_tmp 
7'd74. 

7'd56:b_tmp 
15 7'd14. 

7'd57:b_tmp 

7*d58:b_tmp 

7'd15. 

7'd75. 
20 7'd59:b_tmp 

7'd60:b_tmp 

7'd16. 

7'd61:b_tmp 
7'd76. 
25 7'd62:b_tmp 
7'd17, 

7'd63:b_tmp 
7'd64:b_tmp 
7'd18. 

30 7'd77. 

7'd65:b_tmp 
7'd66:b_tmp 
7'd19:b_tmp 
7'd78:b_tmp 

35 7'd20:b_tmp 
7'd79. 

7'd21:b_tmp 
7'd22:b_tmp 
7'd80:b_tmp 
40 7'd23:b_tmp 
7'd81, 

7'd24:b_tmp 
7'd25:b_tmp 
7'd82;b_tmp 
45 7'd26:b_tmp 
7*d83. 

7'd27:b_tmp 
7'd28:b_tmp 
7'd84:b_tmp 
50 7'd29:b_tmp 
7'd85. 

7'd30:b_tmp 
7'd31:b_tmp 
7'd86:b_tmp 
55 7'd32:b_tmp 
7'd87. 



=20'b0110001 100_10101 1 1011; //W14_128=+0.773010 -0.634393 

=20'b0101111011_1010101000; //W15_128=+0.740951 -0.671559 

=20'b0101101010_1010010110; //W16_128=+0.707l67 -0.707107 
=20'b01 01011 000_1 01 00001 0 1 ; //W1 7_1 28=+0.671 559 -0.74095 1 

:20'b0101000101 1001110100; //W18_128=+0.634393 -0.773010 
:20'b01 001 1 0OOI^I 001 1 001 01 ; //W1 9_1 28=+0.595699 -0.803208 

=20'b0100011100_1001010110; //W20_128=+0.555570 -0.831470 

=20'b0100000111_1001001001; //W21_128=+0. 514103 -0.857729 

=20'b001 1 1 1 0001_1 0001 1 1 100; /A/V22_128=+0.471397 -0.881921 
:20'b001 1011 01 1_1 0001 10001; //W23_128=+0.427555 -0.903989 

=20'b001 1 0001 00_1 0001 001 11; //W24_128=+0.382683 -0.923880 
=20'b001 01 01 1 00_1 00001 1110; /A/V25_1 28=+0.336890 -0.941 544 

:20'b0010010101_1000010110; //W26_128=+0.290285 -0.956940 

=20'b0001 1 1 1 100_1 000001 111; //W27_128=+0.242980 -0.970031 

=20'b0001100100_1000001010; //W28_128=+0. 195090 -0.980785 
=20'b0001001011 1000000110; //W29 128=+0.146730 -0.989177 



=20'b00001 10010 
=20'b000001100l" 
=20'b0000000000" 
=20'b11 11100111' 
=20'b1111001110' 

=20'b1 11001 1100 
=20'b110110101l' 
=20'b1 101010100" 
=20'b1100111100;; 

:20'b 11 00001 111 
=20'b101 1100100" 
=20'b101 1001 111" 
=20'b10101 110111 

=20'b1010010110 
=20'b1001 110100" 
=20'b1001 100101" 
:20*b1001010110] 

=20'b1000111100 
=20'b100010011l" 
=20'b1000011110" 
=20*b 10000 101 10" 



1000000010 
"1000000001 
"1000000000 
"1000000001 
;i 000000010 

1000001010 
"1000010110 
"1000011110 
;i 0001 001 11 

1000111100 
"1001010110 
"1001100101 
;i001 110100 

1010010110 
1010111011 
1011001111 
.1011100100 

1100001111 
1100111100 
"1101010100 
1101101011 



//W30_128=+0.098017 -0.995185 
//W31_128=+0.049068 -0.998795 
//W32_128=+0.000000 -1.000000 
//W33_1 28—0.049068 -0.998795 
//W34_128=-0.098017 -0.995185 

//W36_1 28—0. 195090 -0.980785 
//W38_1 28— 0.290285 -0.956940 
//W39_1 28—0.336890 -0.941544 
//W40_1 28— 0.382683 -0.923880 

//W42_128=-0.471397 -0.881921 
//W44_128=-0.555570 -0.831470 
//W45_128=-0. 595699 -0.803208 
//W46_1 28— 0.634393 -0.773010 

//W48_128=-0.707107 -0.707107 
//W50_128=-0.773010 -0.634393 
//W51_i28=-0. 803208 -0.595699 
//W52_128=-0.831470 -0.555570 

//W54_1 28— 0.881921 -0.471397 
//W56_1 28— 0.923880 -0.382683 
//W57_1 28— 0.941544 -0.336890 
//W58 128—0.956940-0.290285 
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ZS??-?-!"^^^ =20'b1000001010_1 110011 100; //W60 128=-0 980785 -0 195090 
7'd34:b_tmp1 =20'b1 000000010 1 1 1 1001 1 10" //W62"l28=.0995ifi? nnoftniT 
7'd88:b_tmp1 =20'b1000000001-1 1 1 1 100 IV WVes" 28=-09987i? 'nntlnll 
7'd89:b_tmp1 =20"b1000000010-00001100 o' ^66" 28=.0 995iai ^0 098017 
5 7'd90:b_tmp1 =20'b1000001 1 1 1'OOO1 1 1 1 100^ m69- 28=-0 970031 to pf^Sin 
7'd91:b_tmp1 =20'b1 0001 001 1 1'OO1 1000 OO' WW^ IL-olS^^ 
7'd92:b_tmp1 =20'b1001001001-010000011 V /W5- 28-0 857729 tS ??4?n? 
7'd93:b_tmp1 =20'b1001 1 lOIOO'OIOIOOOIOI ■' /AA^S" 28=-0 77^^^ 
7'd94:b_tmp1 =20'b1010101000-01011110l WSl" 28=-0 67??^2 tn ^inq?? 
10 7'd95:b_tmp1 =20'b1011100100-011010 010^ M^W" Ifco Isslfo ^ 

7'd96:b_tmp1 =20'b1 1001 001 01*01 11 001 111' AW8^ 28=-0427i55 +Sqn^Qfl2 
7-d98 b-tmK^ Zl^f.^''^^^^^^^^^^ 

7d98 b tmpi =20'b11101 10101 0111111010; //W93 128=-0 146730+0 989177 
15 end?ase ^^^'""^^ '''''' lT_000000000b; //W00:TI8=+1 000000 

always @(posedge elk) 
if (enable_3) 
b_tmp2 <= b_tmp1; 



20 



25 



assign out_br = b_tmp2[c_wordlength*2-1:c wordienqthl- 
assign out_bi = b_tmp2(c_wordiength-1:0]; ~ 

endmodule 

Listing 11 



// Sccsid: %W% %G% 

* .w„*»***.* 

30 Copyright (c) 1997 Pioneer Digital Design Centre Limited 

Author ; Dawood Aiam. 

Description: Verilog code for a lookup table decoder 

35 

A^J^"^ Kll^^^^^^ addresses for each coefficient, based on the 
mAddress. Addresses are dependent on one of 4 rows 
(see figures) and on the sequence length (rom AddressSize) Each 
row gives rise to a unique address sequence based on an 
40 algorithm. N refers to the index of the twiddle factor NOT the 

absolute address. Breakpoints determine where inc values chanqe 
on line 2. 



45 

"timescale Ins / lOOps 

module fft^coeff_dcd (elk. enable_3. in_address. out_address. nrst); 

50 parameter rom_AddressSize = 1; // Twice ROM address 
parameter break_point2 = 1 ; // 2nd break pt line 2 
parameter break_point3 = 1 ; // 3rd break pt line 2 

input [rom_AddressSize-1:0] in address- 
55 input elk, ~ 

nrst. 
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enable_3; 

output [rom_AddressSi2e-2:0] out_address; 

5 wire [rom_AddressSize-2:0] out^address; 
wire [1:0] line_number; 
wire nrst; 

reg [rom_AddressSize-2:0] out_address_tmp; 
10 reg [1:0] inc, count; 
reg rst; 

// Decode whicii of the 4 lines are being addressed and assign it a line no. 
// Only need upper two bits of in_address since 4 lines in sequence length. 
15 assign line__number = {in_address[rom_AddressSize-1], 
in_address[rom_AddressSize-2]}; 

// Check for end of line and force out_address to zero on next clock edge, 
always @(in_address) 
20 if (in_address[rom_AddressSize-3:0] == {rom_AddressSize-2{1 *b1}}) 

rst = 0; 

else 

rst = 1; 

25 // Check for line number and decode appropriate out_address using algorithm 
// derived by studying coefficient tables for mpys MO, Ml and M2. 
always @(line_number or in_address or count) 
case (line_number) 

//- 

30 2*d0: // LINE 0, inc by 2, then run the inc sequence 1.1.2.1.1.2... 
begin 

if (in_address[rom_AddressSize-3] & (iin_address[rom_AddressSize-4:0])) 
begin 

if (count == 2'd1 | count == 2'dO) 
35 inc = 2'd1; 

else 

inc = 2'd2; 
end 
else 

40 inc = 2'd2; 

end 

// 

2'd1://LINE 1. inc by 1. 
inc = 1 ; 

45 // 

2^d2: // LINE 2 inc by 3. (inc by 2 at N/4+1), (inc by 1 at N/2-1), 
begin 

if (in_address[rom_AddressSize-3:0] >= break_point3) 

inc = 2'd1 ; // Third stage, inc by 1 . 

50 else if (in_address[rom_AddressSize-3:0] >= breakj3oint2) 

inc = 2'd2; // Second stage, inc by 2. 

else 

inc = 2'd3; // First stage, inc by 3. 

end 

55 //- 

2'd3: // LINE 3, fixed at address 0. 
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inc = 2'dO; 
// 



endcase 



5 always @(posedge elk) 
if (enable_3) 
begin 

if (Inrst 1 1 !rst) // out_address=0 at end of line or pwr Reset 
out_address_tmp <= 0: r- . 

10 else 

out_address_tmp <= out_address_tnrip + inc; 

// Only count if at the correct point on line 2 

if (in_address[rom_AddressSi2e-3] & ( | in_address[rom AddressSize-4 01)) 
15 count <= ((count == 2'd2) ? 2'dO : count + 2'd1); // Only count to 2 

count <= 2'dO; 
end 

20 assign out_address = out_address_tmp; 
endmoduie 

Listing 12 

// Sccsid: %W% %G% 
25 /* . . 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 
Author : Dawood Alam. 

30 Description: Verilog code for a configurable 2K/8K radix 2'^2 + 2 
singlepath-delay-feedback, decimation in frequency 
(r22+2sdf DIF) Fast Fourier Transform (FFT) processor. (RTL) 

Notes : This FFT processor computes one pair of l/Q data points every 4 
JO fast elk cycles. A synchronous active-low reset flushes the 

entire pipeline and resets the FFT. Therefore the next pair of 
valid inputs are assumed to be the start of the active interval 
of the next symbol. There is a latency of 2048/8192 sample 
points + 7 slow clock cycles. This equates to (2048/8192 + 7)*4 
40 fast elk cycles. When the out_ovf flag is raised an overflow has 

occured and saturation is performed on the intermediate 
calculation upon which the overflow has occured If the valid in 
flag IS held low, the entire pipeline is halted and the 
valid_out flag is also held low. valid_out is also held low 
45 until the entire pipeline is full (after the above number of 

clock cycles). 

To Do: RAM control (MUX). 
ROM lookup (quadrant lookup). 

Change BF code for unique saturation nets for synthesis 
ovf_detection (correct) register o/p 

ovf detection (correct) for mpy and BFs 
ROM/RAM test stuff. 

55 . . .^^^^^ ^ 
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10 



15 



20 



25 



30 



35 



40 



*timescale 1ns / 100ps 

module fft_r22sdf (in_xr. 
in_xi, 
elk, 
nrst, 

in_2k8k, 
validjn, 
out_xr, 
out_xi, 
out_ovf. 
enable_0, 
enable_1 , 
enable_2. 
enable_3, 
valid_out, 
ram_address, 
ram_enable, 
address_rom3, 
address_rom4. 
z2r_4, z2L4, // RAM input ports. 

z2r_5. z2L5. // Output data from this 



z2r_6, z2i_6, 
z2r_7, z2i_7. 
z2r_8, z2i_8, 
z2r_9, z2i_9. 
z2r_10, z2i_10. 
x1r_4. x1i_4. 
x1r_5, x1i_5. 
x1r_6, x1i_6. 
x1r_7. x1i_7, 
x1r_8, x1i_8, 
x1r_9, x1i_9, 
x1r_10. x1i_10. 

br_3. bi_3. 

br_4, bi.4); 



// module. 



// RAM output ports. 
// Input data to this 
// module. 



// 
// 
// 



Parameter definitions. 



45 



50 



parameter 
parameter 
parameter 
parameter 
parameter 



parameter 
parameter 



wordlength = 12; // Data wordlength. 
c_wordlength =10; // Coeff wordlength. 
AddressSize = 13; // Size of address bus. 
rom_AddressSize = 13; // ROM address bus size. 
mult_scale = 3; // Multiplier scalling: 

// 1 = /4096, 2 = /2048. 

//3 = /1024, 4 = /512. 

s12_wdlength =11; // Sectn 12 wordlength. 
si 1_wdlength =12; // Sectn 1 1 wordlength. 
// si 1 >= s12 >=wordlen 



55 



// 
// 
// 



Input/Output ports. 
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input elk, // Master clock. . 
nrst, // Power-up reset. 
In_2k8k, // 2K mode active low. 
validjn; // Input data valid. 
5 input [9:0] in_xr, // FFT input data, I. 

in_xi; // FFT input data, Q. 

input [wordlength-1 :0] x1 r_4. x1 i_4. // RAM output ports 
x1r_5. x1i_5, 
10 x1r_6, x1i_6. 

x1r_7. x1i_7. 
x1r_8, x1i_8, 
x1r_9. x1i_9, 
x1r_10, xli 10; 

15 

input [c_wordlength-1 :0] br_3, bi 3 
br_4. bi_4; 



20 



25 



output out_ovf, 
enable_0, 
enable_1 , 
enable_2. 
enable_3, 

valid_out. 

ram_enable; 



// Overflow flag. 
// Enable clock 0. 
// Enable clock 1. 
// Enable clock 2. 
// Enable clock 3. 
// Output data valid. 



output [wordlength-1 :0] out_xr, // FFT output data I 
out_xi; // FFT output data. Q. 

30 output [wordlength-1 :0] z2r_4.z2i 4. // RAM input ports 
z2r_5, z2i_5, 
z2r_6, z2i_6, 
z2r_7. z2i_7. 
z2r_8. z2i_8, 
35 z2r_9. z2i_9, 

z2r_10. z2i_10; 

output [rom_AddressSize-6:01 address rom3: 
output [rom_AddressSize-4:0i address_rom4: 

40 

output [AddressSize-1:0] ram_address; 

// __ 

// Wire/register declarations. 
45 // 1 

wire [1:0] control; //elk decode 
wire [AddressSize-1:0] address. // FFT main address bus 
s. // Pipeline SRs to BFs. 

50 ram_address; // RAM address bus. 

wire [wordrength-1:0] x1r_0. x1l_0. // Couples the l/Q data 
x1 r_1 . x 1 i_1 . // outputs from the 
5c1 r_2. x1 i_2. // memory to the 
55 . x1r_3, x1i_3. // respective butterfly 
x1 r_4. x1 i_4. // processors, via an 
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x1r_5, x1i_5, // input register. 
x1r_6, x1i_6, 
x1r_7, x1i_7, 
x1r_8, x1i_8, 
5 x1r_9, x1l_9, 

x1r_10, x1i_10. 

x2r_0, x2i_0. // Couples the l/Q data 

x2r_1 , x2i_1 . // outputs from BF2I 
10 x2r_2, x2i_2, // to the l/Q Inputs of 

x2r_3, x2i_3, // BF2I1. Also connects 
x2r_4, x2i_4. // the I/Q ouputs of the 
x2r_5, x2i_5, // complex multiplier 
x2r_6, x2i_6. // to the inputs of the 
15 x2r_7, x2i_7. // next radix 2'^2 stage. 

x2r_8, x2i_8, 

x2r_9, x2i_9. 

x2r_10. x2i_10; 

20 reg [wordlength-1:0] x1r_4_tmp, x1i_4_tmp, // Registered inputs 
x1r_5_tmp, x1i_5_tmp, //from RAM. 

x1 r_6_tmp. x1 i_6_tmp, 

x1 r_7_tmp, x1 i_7_tmp, 

x1r_8_tmp. x1i_8_tmp, 
25 X 1 r_9_tmp, x 1 i_9_tmp , 

x1 r_1 0_tmp, x1 i_1 0_tmp; 

wire [s1 1_wdlength-1 ;0] x1 r_1 1 , x1 i_1 1 , // Different bit-widths 
x2r_11, x2i_11: // for l/Q lines, but 
30 wire [s12_wdlength-1 :0] x1 r_12, x1 i_12; // similar to the above. 

wire [wordlength-1:0] ar_0, ai_0, // Couples the l/Q data 
ar_1 . ai_1 . // outputs of the 
ar_2, ai_2, // previous radix 2'^2 
35 ar_3, ai_3, // stage into the 

ar_4, ai_4, // complex multiplier 
ar_5, ai_5; // of the next stage. 

wire [c_wordlength-1:0] br_0, bi_0. // Couples the l/Q 
40 br_1 . bi_1 . // coefficient outputs 

br_2, bi_2, // from the ROM demapper 
br_3. bi_3. // to the complex 
br_4. bi_4, // multiplier. 
br_5, bi_5; 

45 

wire [wordlength-1:0] z2r_0. z2i_0, 
z2r_1,22i_1. 

z2r_2. z2i_2, 
z2r_3, z2i_3; 

50 

reg [wordlength-1:0] z2r_4, z2i_4. // Registered outputs 
z2r_5, z2i_5. // to RAM. 

z2r_6. z2i_6. 
z2r_7. z2i_7. 
55 z2r_8. z2i_8. 

z2r_9. z2i_9; 
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10 



15 



20 



25 



30 



35 



40 



45 



50 



55 



wire [wordlength-1:0] z2r_10. z2L10; //WILL CHANGE WHEN RAM RIGHT 2 rg 

wire [wordlength-1:0] 22r_4_tmp. z2i_4_tmp. // Couple the l/Q data 
z2r_5_tmp, z2i_5_tmp, // outputs of each BF 

z2r_6_tmp, z2i_6_tmp, // processor to their 
22r_7_tmp. z2i_7_tmp. // respective memory 

z2r_8_tmp, z2i_8_tmp, //inputs via an output 

z2r_9Jmp, z2i_9_tmp. //register. 
z2r_1 0_tmp. z2i_1 0_tmp; 

wire [si 1 wdlength-1 :0] z2r_1 1 . z2i_1 1 ; // Different bit-widths 
wire [s12_wdlength-1:0]z2r_12.z2i_12: //forthe 1st2stages. 



wire [rom_AddressSize-8:0] address rom2- 
wire [rom_AddressSize-6:0] address'roms" 
wire [rom_AddressSize-4:0] address~rom4' 
wire [rom_AddressSize-2:0] address~rom5; 

wire [rom_AddressSlze-7:0] dcd_address2- 

wire [rom_AddressSize-5:0j dcd^addresss' 

wire [rom_AddressSize-3:0j dcd_address4' 

wire [rom_AddressSize-1:0j dcd_address5' 



// Couples the address 
// decoders outputs to 
// respective ROMs. 



// Couples part of the 
// address bus to the . 
// coefficient decoder. 



wire 



wire 



ovf_0, ovf_1, 
ovf_2. ovf_3. 
ovf_4, ovf_5, 
ovf_6. ovf_7, 
ovf_8. ovf_9, 
ovf_10, ovf_11. 
ovf_12. ovf_13, 
ovf_14, ovf_15, 
ovf_16, ovf 17, 
ovf_18; 

elk. 
nrst, 

in_2k8k. 
ovf_2k. 

out_ovf, 

enable_0. 

enable_1, 

enable_2, 

enable_3. 
ram enable; 



// Couples overflow 
// flag outputs from 
// each butterfly 
// processor and complex 
// multiplier into one 
// overflow status flag 
// called "out ovf. 



// RAM enable signal. 



reg 



ovf_tmp1, 
ovf_tmp2, 

fft_cycle_complete. // End of 1 st FFT cycle 
ro«, output_valid; // Output valid flag, 
reg [3:0] pipeline_count; // Counts pipeline regs 
reg [AddressSize-1 :0] q, t; 
reg [1:0] r; 

reg [wordlength-1:0] x1r_0_reg. xli 0 reg 
xr_tmp2. // Output data reg. I. ' 
xi_tmp2; // Output data reg, Q. 
reg [s12_wdlength-1:0] in_xr_tmp, in xi tmp- 
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reg [9:0] xr_reg. // Input data reg, I. 

xi_reg; // Input data reg, Q. 
reg [wordlength-1:0] x2r_1 0_tmp2. x2M 0_tmp2, 

x2r_10_tmp3, x2i_1 0_tmp3; 

5 

wire [wordlength-1:0] xr_tmp1. // Final BF2I(0) out, I. 

xijmpl ; // Final BF2I(0) out. Q. 
wire [wordlength-1:0] x2r_10_tmp1, x2i_10_tmp1: 
wire (s1 2_wdlength-1 :0] x2r_1 1_tmp, x2i_1 1_tmp; 

10 

// 

// Address decoders/Quadrant mappers + pipeline shift registers. 
// 

15 /* fft_sr_addr #(rom_AddressSize-6, 3) sr_addr_2 
(elk, enable_3, 
address[6:01, // Input. 
dcd_address2); // Output. 

20 fft_coeff_dcd #(rom_AddressSize-6, 11, 21) 

coeff_dcd_2 (elk, enable_3, dcd_address2, address_rom2, nrst); */ 

// 

25 fft_sr_addr#(rom_AddressSize-4, 2) sr_addr_3 
(elk, enable_3. 
address[8:0]. // Input. 
dcd_address3); //Output. 

30 fft_eoeff_ded #(rom_AddressSize-4, 43. 85) 

coeff_ded_3 (elk, enable_3. ded_address3, address_rom3. nrst); 

// 

35 fft_sr_addr #(rom_AddressSize-2. 1) sr_addr_4 
(elk. enable_3, 
address(10:01. //Input. 
dcd_address4); // Output. 

40 fft_eoeff_dcd #(rom_AddressSize-2. 171. 341) 

eoeff_dcd_4 (elk, enable_3, ded_address4, address_rom4, nrst); 

// 

45 r fft_eoeff_ded #(rom_AddressSize, 683, 1 365) 

coeff_ded_5 (elk, enable_3, address, address_rom5, nrst); */ 

// 

// ROM lookup tables. 
50 // 

fft_hardwired_luO #(e_word length, rom_AddressSize-10)// Case table instanee 
romO (elk, enable_3, address[2:0], br_0, bi_0); // for a hardwired ROM. 

55 fft_hardwired_lu1 #(c_word length, rom_AddressSize-8) // Case table instance 
romi (elk. enable_3, address[4:0]. br_1, bi_1); // for a hardwired ROM. 
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fft hardwired Iu2 #(c_word length. rom_AddressSi2e-6) // Case table instance 
rom2 (elk. enable_3. address[6:0], br_2. bi_2); // for a hardwired ROM. 

m hardwired Iu3 #(c_word length. rom_AddressSize-4) // Case table instance 
5 rom3 (elk. enable_3, address[8:0], br_3. bi_3); // for a hardwired ROM.*/ 

m hardwired lu3#(c_wordlength. rom_AddressSi2e-5)// Case table instance 
rom3 (elk, enable_3, address_rom3, br_3. bi_3); // for a hardwired ROM.*/ 

10 rfft_rom #(c_wordlength, rom_AddressSize-6, 

". ./../. ./fft/src/lookup_tables/Iu_1 0bit_1 28pt scalel ") 
rom2 (address[6:0]. br_2. bi_2); // 128 addresses x 20 bits, no decode. */ 

/*fft_rom #(c_word length, rom_AddressSi2e-7 
15 "../../../fft/src/lookup_tables/lu_1 0bit_128pt_scale1") 

rom2 (address_rom2. br_2, bi_2): // 64 addresses x 20 bits, coeff decode. */ 

/*fft_rom #(c_wordlength. rom_AddressSize-4 

". ./../../fft/src/lookup_tables/lu_1 Obit_5 1 2pt scalel ") 
20 rom3 (address[8:0]. br_3. bi_3); // 512 addresses x 20 bits, no decode. */ 

/* fft_rom #(c_wordlength, rom_AddressSi2e-5 

"../../../fft/src/lookup_tables/lu_1 0bit_512pt_scale1") 
rom3 (elk. enable_3. address_rom3. br_3, bi_3); // 256 addresses x 20 bits.*/ 

25 

/*fft_rom #(c_word length, rom_AddressSize-2 

"../../../fft/src/lookup_tables/lu_1 0bit_2048ptlscale1 ") 
rom4 (address[10:0]. br_4, bi_4); // 2048 addresses x 20 bits, no decode. */ 

30 r fft_rom #(c_word length, rom_AddressSize-3. 

"../../../fft/src/lookup_tables/lu_10bit_2048p't_scale1") 
rom4 (elk. enable_3, address_rom4, br_4. bi_4); // 1024 addresses x 20 bits.*/ 

rfft_rom #(c_word length, rom_AddressSize, 
35 "../../../fft/src/lookup_tables/lu_1 0bit_81 92pt_scale1") 

rom5 (address, br_5. bi_5); // 8192 addresses x 20 bits, no decode. */ 

r fft_rom #(c_wordlength. rom_AddressSize-1 , 

"../../../fft/src/lookup_tables/lu_10bit_8192pt_scale1") 
40 rom5 (elk. enable_3. address_rom5. br_5, bi_5): // 4096 addresses x 20 bits */ 



45 



// 



// Section 12 and 11. tail end of FFT pipeline (input stage) 

// „™ 12 IS 11 bits wide and incorporates the 2K/8K control logic. 



always @(xr_reg or xi_reg or in_2k8k or x2r 10 tmpi orx2i 10 tmpi 
or x2r_10_tmp3 orx2i_10 tmp3T ~ - - r- 

if (!in_2k8k) //Configuring for 2K mode. 
50 begin 

x2r_10_tmp2 = x2r_10_tmp3; 
x2i_1 0_tmp2 = x2i_1 0_tmp3: 
in_xr_tmp = 0; 
in_xi_tmp = 0; 
55 end 

else // Configuring for 8K mode. 
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begin 

x2r_10_tmp2 = x2r_10_tmp1; 
x2i_1 0_tmp2 = x2i_1 0_tmp1 ; 

// Sign extend fronn 10 bits, as section 12 is s12_wdlength bits. 
5 in_xr_tmp = {{(s12_wdiength-9){xr_reg[9]}}.xr_reg[8:0]}; 

in_xi_tmp = {{(sl2_wdlength-9){xi_reg[9]}},xi_reg[8:01}; 
end 

always @(posedge elk) // Pipeline register to enable correct operation in 
10 if (enable_3) // 2K mode without retiming the entire pipeline since 
begin // 8K mode introduces 1 additional pipeline register. 
// Sign extend 10 bit inputs to wordlength bit inputs. 
// for bypass lines into stage 5. 

x2r_10_tmp3 <= {{(wordlength-9){xr_reg[9]}},xr_reg[8:0]}; 
15 x2i_1 0_tmp3 <= {{(wordlength-9){xi_reg[91}}.xi_reg[8:0]}; 

end 



20 



assign x2r_10 = x2r_10_tmp2; 
assign x2i_10 = x2i_10_tmp2; 



// Sign extend from s12_wdlength bits to s11_wdlength bits between 
// sections 12 and 1 1 . Uncomment below if s_1 1 < > s_12. 
assign x2r_11 = {{(si 1_wdlength-s12_wdlength+1) 

{x2r_1 1_tmp[s12_wdiength-1]}}.x2r_1 1_tmp[s12_wdlength-2:0]}; 
25 assign x2i_11 = {{(si 1_wdlength-s12_wdlength+1) 

{x2i_1 1_tmp[s12_wdlength-1]}}.x2i_1 1_tmp[s12_wdlength-2:01}; 
// Uncomment below if s_1 1 = s_12. 
/• assign x2r_1 1 = x2r_1 1_tmp: 
assign x2i_1 1 = x2i_1 1_tmp; */ 

30 

fft_bf2l #(s12_wdlength) bf2L6 
(elk, enable_1, 

x1r_12. x1i_12, in_xr_tmp, in_xl_tmp. // Ext In. 
s[121. 

35 x2r_1 1_tmp, x2i_1 1_tmp, 22r_12. z2i_1 2, // Outputs. 

ovf_18); 

/• fft_ram #(s12_wd length. 12) ram_12 (elk, enable_1, enable_3. 
ram_address{1 1 :0], // 4096 addrs. 
40 z2r_12. z2i_12. //Inputs. 

x1r_12. x1i_12); // Outputs. */ 

fft_bf2ll #(s11_wdlength) bf2ll_6 
(elk. enable_1. 

45 x1 r_1 1 . x1 i_1 1 . x2r_1 1 , x2i_1 1 . // Inputs. 

s[111. s[12]. 

ar_5, ai_5. z2r_1 1 , 22i_1 1 . // Outputs. 
ovf_17); 

50 fft_sr_1bit#(1) sr_1bit_11 (elk. enable_3. address[11]. sIHJ): // SR 11. 
fft_sr_1bit #(1) sr_1bit_12 (elk. enable_3. address(12]. s[12]); // SR 12. 

/* fft_ram #(s1 1_wdlength. 11) ram_1 1 (elk, enable_1 , enable_3. 
ram_address(10:01. // 2048 addrs. 
55 z2r_1 1 , z2i_1 1 . // Inputs. 

x1 r_1 1 , x1 i_1 1 ); // Outputs. 7 
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35 



// _ — 

// Section 10 and 9. 
// 



fft_complex_mult mux #(wordlength. c_wordlength. mult scale) m5 
(ciK, control, ~ 
ar_5. ai_5. br_5, bi_5, // Inputs. 

^^i-J2r-*"^P^ • ^2L1 0_tmp1 . // Outputs. 
10. ovf_16); 

m_bf2l #(wordlength) bf2l_5 (elk, enable 1 
x1r_10, x1l_10. //Inputs. 
x2r_10, x2i 10, 
15 s[10], 

x2r_9, x2i_9, // Outputs. 

z2r_10, z2i 10. 
ovf_15); 

20 m_bf2ll #(wordlength) bf2ll_5 (elk. enable 1 
x1r_9_tmp, x1i_9_tmp, //Inputs.' 

x2r_9, x2i 9, 
s[9]. s{10]. 

a''_4, ai_4. //Outputs. 
25 22r_9_tmp, z2i 9 tmp, 

ovf_14); 



msr_1bit#(2) sr_1bit_9 (elk. enable_3. address[9]. sfgi)- // SR 9 
fft_sr_1bit #(2) sr_1blt_10 (clk. enable_3. address[10]. s(10]): // SR 10. 



// . 

// Section 8 and 7. 
// 



fft_eomplex_mult_mux #(wordlength, e_wordlength. mult scale) m4 
(elk, control, ~ 

ar_4. ai_4. br_4. bi_4, // Inputs. 
x2r_8. x2i_8, // Outputs. 

40 ovf_13); 

fft_bf2l #(wordlength) bf2l_4 (elk, enable 1 
x1r_8_tmp. x1i_8_tmp, //Inputs. 
x2r 8. x2i 8, 
45 s[81.- - 

x2r_7, x2i_7. // Outputs. 

z2r_8_tmp. 22i 8 tmp. 
ovf_12): - - ^ 

50 fft_bf2ll #(wordiength) bf2ll_4 (elk, enable 1 
x1r_7_tmp, x1i_7_tmp, //Inputs* 

x2r_7. x2i_7, 
sm. s[8]. 

a''_3. ai_3. //Outputs. 
55 22r_7_tmp. 22i 7 tmp. 

ovf_11); 
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fft_sr_1bit #(3) sr_1bit_7 (elk. enable_3, address[7]. s(7]); SR 7. 
fft_sr_1bit #(3) sr_1bit_8 (elk. enable_3. address[8], s(8]); // SR 8. 



// 

// Seetion 6 and 5. 
// 



fft_complex_mult_mux #(wordlength, c_word!ength, mult_scale) m3 
10 (elk, control. 

ar_3. ai_3, br_3. bi_3, // Inputs. 
x2r_6. x2i_6. // Outputs. 

ovf_10); 

15 fft_bf2l #(wordlength) bf2l_3 (elk. enable_1 . 

x1r_6_tmp. x1i_6_tmp. // Inputs. 

x2r_6, x2i 6. 
s[6]. 

x2r_5, x2i_5, // Outputs. 
20 z2r_6_tmp, z2i_6 tmp, 

ovf_9); 

fft_bf2ll #(word!ength) bf2ll_3 (elk. enable_1. 
x1r_5_tmp. x1i_5_tmp, // Inputs. 
25 x2r_5, x2i_5. 

s(5]. s[6]. 

ar_2, ai_2. // Outputs. 

z2r_5_tmp. z2i_5_tmp, 
ovf_8); 



fft_sr_1bit #(4) sMbit_5 (elk. enable_3. address[5], s[5]); // SR 5. 
fft_sr_1bit #(4) sr_1bit_6 (elk. enable_3. address[6], s[6]); // SR 6. 



// 



35 // Seetion 4 and 3. 
// 



fft_eonnplex_mult_nnux #(wordlength, e_wordlength, mult_scale) m2 
(elk, eontrol, 

40 ar_2. ai_2. br_2. bi_2. // Inputs. 

x2r_4. x2i_4. // Outputs. 

ovf_7): 

fft_bf2l #(wordlength) bf2l_2 (elk. enable_1. 
45 x1r_4_tmp, x1i_4_tmp, //Inputs. 

x2r_4, x2i 4. 
s[4]. 

x2r_3, x2i_3. // Outputs. 
z2r_4_tmp. z2i_4_tmp. 
50 ovf_6); 

fft_bf2II #(wordlength) bf2ll_2 (elk. enable_1. 
x1r_3, x1l_3, //Inputs. 
x2r_3, x2i_3, 
55 s[3J. s(4]. 

ar_1.aM. //Outputs. 
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z2r_3. 22i 3. 
ovf_5): 



fft_sr_1bit #(5) sr_1bit_3 (elk. enable 3, addressr31, sr31)- // SR 3 
m_sr_1bit #(5) sr_1blt_4 (elk. enable:3; address[4i: sft)! // SR 4. 

m_sr_iq #(wordlength. 8) srjq_3 (elk. enable 3. // Length = 8 
22r_3, z2i_3, //Inputs. ~ 
x1 r_3, x1 i_3); // Outputs 



// 

// Section 2 and 1 . 
// 



15 m_complex_mult_mux#(wordlength. c wordlength. mult scale) ml 
(elk. control. ~ - ' 



ar_1. ai_1, br_1, bi_1. // Inputs 
x2r_2, x2L2. // Outputs, 

ovf 4); 



fft_bf2l #(wordlength) bf2l_1 (elk. enable 1 
x1r_2. x1l_2, // Inputs. 

x2r_2. x2i 2. 
s[2]. 

25 x2r_1.x2i_1, //Outputs 

z2r_2. 22i 2. 
ovf_3); 

fft_srjq #(wordlength. 4) sr_lq_2 (elk. enable 3. // Length = 4 
30 z2r_2. z2i_2. //Inputs. " 

x1r_2. x1i_2); //Outputs. 

fft_bf2II #(wordlength) bf2ll_1 (elk. enable 1 
x1r_1.x1i_1. //Inputs. 
35 x2r_1,x2i_1. 

s[1]. s[2]. 

ar_0. ai_0. // Outputs 

z2r_1.22M. 
ovf_2); 

40 

,fm T AlVZ^s'^'^'fii^VKVj'''^'^^^^^ sequence). SR1 not req. 

m-l-,^*IS} ^'-J^W/^^- e"able_3. address[1]. s[1]): // SR 1. 
fft_sr_1bit #(6) sr_1bit_2 (elk. enable_3. address[2]. s[2]); // SR 2. 

45 m_srjq #(wordlength, 2) srjq_1 (elk. enable 3, // Length = 2 
z2r_1,z2i_1. //Inputs. ~ 
x1r_1. xlM); //Outputs. 



// 



^° // °' °^ pipeline (output stage). mult_seale=4. 



fft_complex_mult_mux #(wordlength. c wordlength 4) mO 
(elk. control. ~ » • / 

55 ar_0. ai_0. br_0, bi_0. // Inputs 

x2r_0, x2i_0. // Outputs. 
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ovf_1); 

fft_bf2l #(wordlength) bf2L0 (elk, enable^l, 
x1r_0, x1i_0, // Inputs. 

x2r_0, x2L0. 
s[0], 

xr_tmp1 , xi_tmp1 , // Outputs. 

z2r_0. z2L0. 
ovf_0); 

assign s[0] = -'address[0]; // Invert s[0] (see count sequence). SRO not req. 
//fft_sr_1bit #(7) sr_1bit_0 (elk. enable_3. address[0]. s[0]); // SR 0. 



// Last stage should be just a single register as only 1 location needed. 
15 always @(posedge elk) // No reset required as data clocked through registers, 
if (enable_3) 
begin 
x1r_0_reg <= z2r_0; 
x1i_0_reg <= 22i_0; 
20 end 



assign x1r_0 = x1r_0_reg; 
assign x1i_0 = x1i_0_reg; 



25 // 



// Register Inputs/Outputs. 
II 



'ifdef BIN^SHIFT 
30 always @(posedge elk) // Registered inputs. 

if (enable_3 && !address[0]) // == freq bin shift by pi. 
begin 
xr_reg <= in_xr; 
xi_reg <= in_xi; 
35 end 

else if (enable_3 && address[0]) // == freq bin shift by pi. 
begin 

xr_reg <= Hn_xr + 1*b1 ; //This is equivalent to multiplying by 
xi_reg <= Hn_xi + rb1; // exp(-j * pi * n) == (-l^n. 
40 end 
'else 

always @(posedge elk) // Registered inputs, 
if (enable_3) 
begin 

45 xr_reg <= in_xr; 

xi_reg <= in_xi; 
end 
'endif 

50 always @(posedge elk) // Registered outputs, 
if (enable_3) 
begin 
xr_tmp2 <= xr_tmp1; 
xi_tmp2 <= xi_tmp1; 
55 end 
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assign out_xr = xr_tmp2; 
assign out_xi = xi_tmp2; 

always @(posedge elk) // RAMs are latched on outputs so no 
5 begin // need to enable. 

22r_4 <= z2r_4_tmp; // Register FFT outputs to RAM 

z2i_4 <= z2i_4_tmp: 

z2r_5 <= z2r_5_tmp; 

z2i_5 <= z2i_5_tmp; 
10 z2r_6 <= z2r_6_tmp; 

z2i_6 <= z2l_6_tmp: 

z2r_7 <= z2r_7_tmp; 

z2i_7 <= 22i_7Jmp; 

z2r_8 <= z2r_8_tmp: 
15 z2i_8 <= z2i_8_tmp; 

z2r_9 <= z2r_9_tmp; 

z2i_9 <= z2i_9_tmp; 
// z2r_10 <=z2r_10_tnnp; 
// z2l_10 <= z2i_10_tmp; 
20 x1 r_4_tmp <= x1 r_4: // Register FFT Inputs from RAM 

x1 i_4_tmp <= x1 i_4; 

x1r_5_tmp <= x1r_5; 

x1i_5_tmp <= x1i_5; 

x1r_6_tmp <= x1r_6; 
25 x1i_6_tmp <= x1i_6; 

x1r_7_tmp <= x1r_7; 

x1i_7_tmp <= x1i_7; 

x1r_8_tmp <= x1r_8; 

x1i_8_tmp <= x1i_8: 
30 x1r_9_tmp <= x1r_9; 

x1i_9_tmp <= x1i_9; 
// x1 r_1 0_tmp <= x1 r_1 0; 
// x1i_10_tmp <= x1l_10; 
end 



35 



40 



// 
// 
// 



Synchronous butterfly controller. 



always @(posedge elk) 

if (Inrst) // Synchronous power-up reset 

q <= 0; 

else if (enable_3) 
45 q<=q + 1'b1; 

assign address = q; 

// 

50 // Synchronous RAM address generator. 



always @(posedge elk) 

Cnrst) // Synchronous power-up reset. 

55 t <— 0; 

else if (enable_2) 
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t<= t+ rbl; 

assign ram^address = t; 

5 assign ram_enable = enable_3 1 1 enable_2; // ram enable signal. 
// 

// vaiid_out status flag generation. 

// 

10 always @(posedge elk) 
if (Inrst) 

fft_cycle_complete <= VbO; // Detect end of 1st fft cycle i.e. 2K or 8K. 
else if (Hn_2k8k && &address[10:0]) 1 1 (in_2k8k && &address[12:0])) 
fft_cycle_complete <= rb1; 
15 else 

fft_cycle_connplete <= fft_cycle_complete; 

always @(posedge elk) // Account for pipeline and I/O registers, 
if (Inrst) 

20 pipeline_count <= 4'bO; // Stop at pipeline_depth - 1 . 

else if (enable_3 && fft_cyele_connplete & pipeline_count < 8)//pipe depth=8 
pipeline_count <= pipeline_count + 1*b1; 

always @(posedge elk) // Test if the pipeline is full and the input 
25 if (Inrst) // is valid before asserting valid_out. 

output_valid <= I'bO; 
else if (enable_2 && pipeline_eount[3]) 

output_valid <= Vbl; 
else 

30 output_valid <= I'bO; 

assign valid^out = output_valid; 

// 

35 // Fast 40 MHz clock decoder and valid Jn control. 

// 

always @(posedge elk) 

if (Inrst) // Synchronous power-up reset. 

40 r <= 0; 

else if (valid Jn) // Count if input data valid. 

r<=r+rb1; 

assign control = {valid Jn & r[1]. valid Jn & r[0]}; 

45 

assign enable_0 = validjn & (-r[1] & --r[01); // Gate validjn with 
assign enable_1 = validjn & (-r(1] & r[0]); // decoded enable signals 
assign enable_2 = validjn & ( r[1] & --rfO]); // to control all reg's. 
assign enable_3 = validjn & ( r[1] & r[0]); 

50 

// 

// Overflow detection. OR overflows from each stage to give overflow flag. 



55 assign ovf_2k = ovf_0 1 1 ovf_1 [ | ovf_2 j | ovf_3 1 1 ovf_4 1 1 
ovf_5 1 1 ovf_6 1 1 ovf_7 1 1 ovf_8 1 1 ovf_9 ( j 
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ovf_10 II ovf_11 
ovf_15; 



112 

ovf_12 II ovf_13 II ovf_14 



// 2k/8k Overflow flag configuration. 

always @(ln_2k8k or ovf_16 or ovf 17 or ovf 18 or ovf 2W 
If(in_2k8k) ~ ~ - ' 

ovf_tmp1 = ovf_2k 1 1 ovf_16 1 1 o\/f_17 1 1 ovf 18; 
else 

ovf_tmp1 = ovf_2k; 

always @(posedge elk) // Register overflow 

if (enable_3 && fft_cycle_complete) // flag to change when 
ovf_tmp2 <= ovf_tmp 1 ; // |/Q samples are valid 

// from FFT processor. 

assign out_ovf = ovf_tmp2; 

Mfdef OVERFLOW_DEBUG 

// Debug code to display overflow output of a particular instance 
// Concurrently monitor overflow flag and halt on overflow, 
always @(out_ovf) // ovf_x wires are all registered at lower level 
if (out_ovf) 
begin 

Sdisplay ("Overflow has occurred, type . to continue ")• 

Sdisplay ("Overflow flag, out_ovf = ",out_ovf)- 

if (ovf_1 8) Sdisplay ("Overflow on port ovf_1 8")- 

if (ovf_1 7) Sdisplay ("Overflow on port ovf_1 7")' 

if (ovf_16) Sdisplay ("Overflow on port ovf_16"); 

if (ovf_15) Sdisplay ("Overflow on port ovf_15"); 

if (ovf_14) Sdisplay ("Overflow on port ovf_14")' 

if (ovf_13) Sdisplay ("Overflow on port ovf_13")' 

if (ovf_12) Sdisplay ("Overflow on port ovf_12")' 

if (ovf_1 1) Sdisplay ("Overflow on port ovf_1 1")' 

if (ovf_10) Sdisplay ("Overflow on port ovf_10")' 

if (ovf_9) Sdisplay ("Overflow on port ovf_9")- 

if (ovf_8) Sdisplay ("Overflow on port ovf_8"); 

if (ovf_7) Sdisplay ("Overflow on port ovf_7")' 

if (ovf_6) Sdisplay ("Overflow on port ovf_6")* 

if (ovf_5) Sdisplay ("Overflow on port ovf_5"); 

if (ovf_4) Sdisplay ("Overflow on port ovf_4"); 

if (ovf_3) Sdisplay ("Overflow on port ovf_3"); 

if (ovf_2) Sdisplay ("Overflow on port ovf_2")' 

if (ovf_1 ) Sdisplay ("Overflow on port ovf_1 "); 

if (ovf_0) Sdisplay ("Overflow on port ovf 0")' 

Sstop; r- _ 

end 
endif 
endmodule 



50 // Sccsid; %W% %G% 
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Description: Verilog code for the window lookup table, used to determine the 
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variance of the data and hence the F_ratio. 
Notes : 
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'timescale Ins / lOOps 

module fft_windowJu (elk, enable_3, in_address, out_data); 

parameter r_wordlength = 10; // Data wordlength. 
parameter lu_AddressSize = 13; // Address bus size. 



elk. 
enable_3; 
input [lu_AddressSi2e-1 :0] in_address; 



input 
input 

output [r_wordlength-1:0] out_data; 

reg [r_wordlength-1 :0] data_tmp 1 , 
data_tmp2; 



always @(in_address) 
casez (in_address) 
13'b0000000000000 



13'b0000000000001 
13'b0000000000010 
13'b0000000000011 
13'b0000000000100 
13'b0000000000101 
13'b0000000000110 
13'b0000000000111 
13'b0000000001000 
13'b0000000001001 
13'b0000000001010 
13'b0000000001011 
13'b0000000001100 
13*b0000000001101 
13'b0000000001110 
13'b0000000001111 



data_tmp1 




10'b 1000000000 


data_tmp1 




10'bOOOOOOOOOO 


data_tmp1 




lO'booooioom 


data_tmp1 




10'b0000111110 


data_tmpl 




lo'boooioomo 


data_tmp1 




lO'bOOOIOIIOH 


data_tmp1 




10'bOOO1100110 


data_tmp1 




10'bOOOIIOIIIO 


data_tmp1 




lO'bOOOIIIOHO 


data_tmp1 




10'b0001111101 


data_tmp1 




10'bOOI 0000011 


data_tmp1 




10'bOOI 0001 000 


data_tmp1 




10'bOOI 0001 101 


data_tmp1 




10'bOOI 00 10001 


data_tmp1 




10'bOOI 001 01 10 


data_tmp1 




10'bOOIOOIIOIO 
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13'b00000000 10000 : datajmpi = 10'b0010011 101 
13'b0000000010001 : data_tmp1 = 10'bOOI 01 00001 
13'b0000000010010 : data_tmp1 = 10'b0010100100 
13'bOOOOOOOOIOOII : data_tmp1 = 10'b00101001 1 1 
13'b0000000010100 : data_tmp1 = 10'b0010101010 
13'b0000000010101 : data_tmp1 = 10'b0010101101 
13'b0000000010110 : data_tmp1 = 10'b0010101111 
15 13'b0000000010111 : data_tmp1 = 10'b00101 10010 
13'b00000000 11000 : data_tmp1 = 10'bOOI 01 10100 
13'b0000000011001 : data_tmp1 = 10'bOOIO1 101 1 1 
13'b0000000011010 : data_tmp1 = 10'bOOIO1 1 1001 
13'b0000000011011 :data_tmp1 = 10'b001011101 1 
25 13'b0000000011100 : data_tmp1 = 10'b0010111101 
13'b0000000011101 : data_tmp1 = 10'b0010111111 
13'b0000000011110 : data_tmp1 = 10'bOO1 1000001 
13*b0000000011111 :data_tmp1 = 10'bOO1 100001 1 
13'b00000001 00000 : data_tmp1 = 10'bOO1 1000101 
35 13'b00000001 00001 : data_tmp1 = 10'bOO1 1000110 
13'b00000001 00010 : data_tmp1 = 10'bOO1 1001000 
13'b00000001 00011 : data_tmp1 = 10'b0011001010 
13'b0000000100100 : data_tmp1 = 10'bOO1 1 00101 1 
13'b0000000100101 : data_tmp1 = 10'b0011001101 
45 13'b0000000100110 : data_tmp1 = 10'bOO1 1001 110 
13'b0000000100111 : data_tmp1 = 10'bOO1 1010000 
13'b0000000101000 : data_tmp1 = 10'bOO1 1010001 
13'b0000000101001 : data_tmp1 = 10'bOO1 1010011 
13'b0000000101010 : data_tmp1 = 10'b0011010100 
55 13'b0000000101011 ; data_tmp1 = 10*b0011010101 
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13'b0000000101100 

13'b0000000101101 

13'b0000000101110 

13'b0000000101111 

13'bO00OO001 10000 

13'bO00OOO01 10001 

13'bOO00OO01 10010 

13'bO00OO00 110011 

13'bO00OO001 10100 

13'bOO0OOO01 10101 

13'b00000001 10110 

13'b0000000110111 

13'bOO0OOO01110OO 

13*bOO0OO001 11001 

13'bOO00OO01 11010 

13"bOO0OOOO1 11011 

13'bOO0OOOO1 11100 

13'b00000001 11101 

13'bOO0OOOO11111O 

13'bO00OOOO111111 

13'b0000001 000000 

13"b0000001 000001 

13'b0000001000010 

13'b0000001 000011 
13'b000000 1000 100 

13'bO00OOO10O0101 

13'bO000O0 10001 10 

13'b0000001000111 

13'bOOOOO0 1001002 
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: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 
: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 
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10*b0011010111 
10'bOOIIOIIOOO 
10'bOO1 101 1001 
10'bOOIIOIIOIO 
10'bOOIIOIIIOO 
10'bOO1 101 1101 
10'bOOIIOIIIIO 
1O'bO011011111 
10'bOO1 11 00000 
10'bOO1 1100001 
10'bOO1 11 00010 
10'b0011100011 
10'b0011100100 

lO'boomooioi 

10'bOOIIIOOIIO 
10'bOOIIIOOIII 
10'bOO1 1101000 

lO'boomoiooi 
lO'boomoioio 

lO'bOOH 101011 

10'bOO1 1101 100 

10'bOOIIIOIIOI 

10'bOOIIIOIIIO 

10'b0011101111 
10'bOOIIIOIIII 

10'bOO1 11 10000 

10'bOO1 1110001 

10'bOO1 11 10010 

10'bOO1 11 10011 
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13'b0000001001010 :data_tmp1 = 10'bOO1 1 110100 

13'b0000001001011 :data_tmp1 = 10'bOOI1 1 10101 

13'b000000 100 1102 : data_tmp1 = lO'bOOIIllOIIO 

1 3'bOOOOO0 10011 10 :data_tmp1 = 10'bOOIIIIO1 11 

13'b0000001 001111 :data_tmp1 = 10'bOOIIIIIOOO 

13'b000000101000z:data_tmp1 = lO'bOOlll 11001 

13'b0000001010010 :data_tmp1 = 10'bOOIIIIlOIO 

15 13'b0000001 010011 : data tmpi = 10'b001111101l 
13'b0000001010100 . dataltmpi = 10'bOOII1 11011 

13'b0000001010101 :data_tmp1 = lO'bOOIIlinoO 

20 13'b000000101011z:data_tmp1 = 10'b00111 11101 

13'b0000001011000:data_tmp1 = 10'b0011111llO 

13'b0000001 Oil 001 : data tmpi = I0*b001111llii 
25 13'b0000001011010 : dataltmpi =10'bO01111111l 



30 



13'b0000001011011 :data_tmp1 = 10'bOI 00000000 

13'b000000101110z : data_tmp1 = 10'bOI 00000001 

13'b00000010111l2 : data_tmp1 = 10'bOI 00000010 

13'b000000 1100000 : dataltmpi = 10'bOIOOOOOO1 1 

35 13'b0000001 100001 ; data tmpi = lO'bOl 000001 00 
13'b0000001 100010 : dataltmpi = 10'bOI 000001 00 

13;b0000001 100011 :data tmpi = 10'bOI 000001 01 
13'b0000001 100100 : dataltmpi = 10'bOI 000001 01 

13'b0000001 100101 :data tmpi = 10'b0100000110 
13'b0000001100110 : data^mpl = 10'bOI 000001 10 

13'b0000001100111 : data_tmp1 = 1 0'bOl 000001 1 1 

45 

13'b0000001 101002 : data_tmp1 = 10'bOI 00001 000 
13'b000000110101z:data_tmp1 = 10'b0100001001 
50 13'b000g001101102 : datajmpi = 1O'bO100001O1O 
13'b000000110111z:data_tmp1 = 10'bO1OO001O1 1 
13'b0000001 1 lOOOz : data_tmp1 = 10'bOIOOOO1 100 
13'b0000001 110012 : data_tmp1 = 10'bOI 00001 101 
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13'b000000111010z 

13'b000000111011z 

13'b000000111100z 

13'b000000111101z 

13'b000000111110z 
13'b0000001111110 

13'b0000001111111 
13"b000001 0000000 

13'b000001 0000001 
13'b0000010000010 

13'b000001 0000011 
13'b000001 00001 00 

13'b00000100001z1 
13'b0000010000110 



: (jata_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 
: data_tmp1 

data_tmp1 
data_tmp1 

: data_tmp1 
: data_tmp1 

data_tmp1 
data_tmp1 

: data_tmp1 
: data_tmp1 



13'b000001000100z : datajmpi = 



13'b000001000101z 
13'b000001 0001 100 

13'b0000010001101 
13'b0000010001110 

13*b000001 0001 111 
13'b000001001000z 



data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tnnp1 

: data_tmp1 
data_tmp1 



35 13'bOO00O1O01001z : datajmpi = 



13'b000001001010z 
13'b0000010010110 

13'b0000010010111 
13'b000001001100z 



: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 



13'b000001001101z : data_tmp1 = 



13'b000001001110z 
13'b0000010011110 

13'b0000010011111 
13'b000001010000z 

13'b000001010001z 
13'b0000010100100 

13'b00000101001z1 
13'b0000010100110 



data_tmp1 
: data_tmp1 

: data_tmp1 
data_tmp1 

data_tnnp1 
: data_tmp1 

data_tmp1 
: data_tmp1 
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O'bOIOOOOniO 

O'bOl 00001111 

O'bOl 0001 0000 

O'bOl 0001 0001 

O'bOl 0001 0010 
O'bOl 0001 0010 

O'bOl 000 100 11 
O'bOl 0001 0011 

O'bOl 0001 01 00 
O'bOl 0001 01 00 

O'bOl 000 101 01 
0'b0100010101 

O'bOl 0001 01 10 
O'bOl 0001 01 10 

O'bO1O0010111 

O'bOl 0001 1000 
O'bOl 000 11000 

O'bOl 000 11001 
O'bOl 000 11001 

O'bOl 0001 1010 
O'bOl 0001 1010 

O'bOl 000 11011 

O'boiooomoo 
O'boiooomoo 

0'b0100011101 

o'boiooomoi 

O'bOl 0001 1110 

O'bOl 00011 111 
O'bOl 0001 1111 

O'bOl 001 00000 
O'bOl 001 00000 

O'bOl 001 00001 
O'bOl 001 00001 

O'bOl 001 00010 
O'bOl 00 1000 10 
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13'b000001010100z : data tmp1 = 10'bOIOOIOOO1 1- 
13'b0000010101010 : datajmpl =.10*bO1001OOO1l"; 

13'b0000010101011 : data tmpi = 10'b0100100100- 
5 13'b0000010101102 : datajmpi = 10'bOIOOIOOIOO;' 

13'bO000O1O1O111z : data tmpi = 10'bOIOOIOOIOI- 
13'b000001 01 10000 : data_tmp1 = 10'bOIOOIOOIOl'; 

10 13'b00000101100z1 : data tmpi = 10'bOIOOIOO1 10- 
13'b0000010110010: datajmpi = 10'bOIOOIOO1 10; 

13'b000001011010z : data_tmp1 = 10'bOIOOIOOIII- 
13'b0000010110110 : datajmpi = lO'bOIOOIOOIIl'; 

13'b0000010110111 : datajmpi = lO'bOIOOIOIOOO" 
13'b000001011100z : datajmpi = lO'bOIOOIOIOOO;' 

13"b000001011101z: data tmpi = lO'bOIOOIOIOOI- 
20 13'b000001011110z : datajmpi = lO-bOIOOIOIOOI.* 

13'b000001011111z : data tmpi = 10'b0100101010- 
13"b000001 1000000 : datajmpi = lO'bOIOOIOIOlO; 

25 13'b00000110000z1 ; data tmpi = 10'bOIOOIOIOII- 
13'bOOO0O1100O010 : datajmpi = 10'b010010101l'; 

13"b00000110001zz : datajmpi = 10'bOIOOIO1 100; 

30 13'bb00001100100z: data tmpi = 10'bOIOOIOI lOV 
13'b0000011001010 : datajmpi = 10'bOIOOIO1 101*; 

13'b000001 1001011 rdata tmpi = 10'bOIOOIO1 1 10- 
13'b000001100110z : data'tmpl = 10'b0100l01 1 1o' 
35 13'b000001 1001 110: datajmpi = 10'bOIOOIO1 1 10; 

13;b0000011001111 : datajmpi = 10'bOIOOIOIIII- 
13b000001101000z:data tmpi = 10'bOIOOIOII ll- 
IS'bOOOOOIIOIOOlO : datajmpi = lO'bOIOOIOmi; 

13'b000001 1010011 :data tmpi = lO'bOIOOl 10000- 
13'b000001101010z : datajmpi = lO'bOIOOIiOOOO;' 

13"bO00001101011z : data tmp1 = 10'bOIOO1 10001- 
45 13'b000001101100z : datajmpi = 10'bOIOO1 10001 ;' 

3?S2SSS2^3S^^°"'^-^^*3-*'^Pl = 10'bOIOO1 10010- 
13'b000001 101 1102 : datajmpi = 10'bOIOOIIOOIoi 

^° H?S2222''^°^^''''2-«*ata-tmp1 = 10'bOIOO1 10011 • 
13'b000001110000z: datajmpi = lO'bOIOOIIOOI I.- 

H!u2222°''''^°°°'^2-data-tn^Pl = 10'bOIOO1 10100- 
13'b000001110010z: datajmpi = l0'b0100110100;' 

13'b0000011 1001 Iz: datajmpi = 10'bOI 001 10101; 



40 
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13'b000001110100z : data_tnrip1 = 10'b0100110101; 
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13'b000001110101z 
13'b000001110110z 

13'b000001110111z 
13'b000001111000z 

13'b000001111001z 
13'b000001111010z 
13'b0000011110110 

13'b0000011110111 
13'b000001111100z 
13'b000001 11 11010 

13'b00000111 11011 
13'b000001111110z 
13'bO0OOO11111110 

13'b0000011111111 
13'b00001000000zz : 

13'b00001000001zz: 
13'b00001 00001 000 

13'b00001 00001 Ozl 
13'b00001 00001 010 
13*b00001 00001 100 

1 3*b00001 00001 1z1 
13'b0000100001110 
13'b00001000.1000z 

13'b000010001001z 
13'b000010001010z 
13*b0000100010110 

13'b0000100010111 
13'b00001000110zz : 

13'b00001000111z2 : 
13'b00001 001 00000 

13'b00001001000z1 
13'b00001 001 00010 
13'b000010010010z 

13'b000010010011z 
13*b000010010100z 
13'b0000100101010 

13'b0000100101z11 
13'b000010010110z 
13'b0000100101110 
13'b00001 001 10000 



data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 



O'bOIOOIIOIIO; 
O'bOIOOIIOIIO; 

O'b0100110111; 
O'bOIOOIIOIH; 

O'bOIOOl 11000; 
O'bOIOOl 11000: 
O'bOIOOl 11000; 

O'bOIOOl 11001; 
O'bOIOOl 11 001; 
O'bOIOOl 11001; 

O'bOIOOl 11010; 
O'bOIOOl 11010; 
O'bOIOOmOlO; 

0'b0100111011; 
O'bOIOOl 11 Oil; 

O'bOIOOl 11 100; 
O'bOIOOl 11 100; 

O'bOIOOl 11 101; 
O'bOIOOIIIIOI; 
0*bO1001111O1; 

0'b0100111110; 
O'b0100111110; 
O'bOIOOIIIHO; 

O'b0100111111; 
O'bOIOOIIIIII; 
O'bOIOOinill; 

O'bOl 01 000000; 
O'bOl 01 000000; 

O'bOIOIOOOOOl; 
O'bOIOIOOOOOl; 

O'bOl 01 000010 
O'bOIOIOOOOlO 
O'bOIOIOOOOlO 

O'bOIOIOOOOII 
0'b0101000011 
O'bOIOIOOOOII 

O'bOl 01 0001 00 
O'bOl 01 0001 00 
O'bOl 01 000 100 
O'bOl 01 0001 00 
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13'b00001001100z1 ;clata_tmp1 = 10'bOIOIOOOIOI 
13'bOOO0 100 110010 : data_tmp1 = 10'bOIOIOOOIOI 
13'b000010011010z : data_tmp1 = 10'b0101000101 



13'b000010011011z 
13'b000010011100z 
13'b00001001 11010 



data_tmp1 
data_tmp1 
data_tmp1 



13'b0000100111z11 :data tmpi 
13'b000010011110z : data~tmp1 
13'b00001001 1 1110 : data tmpi 
13'b00001 01 000000 : data~tmp1 



13'b00001010000z1 
13'b0000101000z10 
13'b000010100010z 



data_tmp1 
data_tmp1 
data_tmp1 



13*b0000101000111 :data_tmp1 
13'b000010100102z : data tmpi 
13'b0000101001100 : data_tmp1 

13'b0000101G011z1 :data tmpi 
13'b0000101001110 :data~tmp1 
13'b000010101000z : datajmpi 

13'b0000101010z1z : data tmpi 
13'b000010101010z : data~tmp1 

13'b00001010110zz : data tmpi ^ 
13'b000010101110z : data_tmp1 
13'b0000101011110 : data_tmp1 

13'b0000101011111 :data_tmp1 
13'b00001011000zz : datatmpi = 
13"b0000101 100100 : data tmpi 



13'b00001011001z1 
13'b0000101100110 
13'b000010110100z 
13'b0000101101010 



data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 



13'b0000101101z11 :data tmpi 
13'b000010110110z : data tmpi 
13'b0000101 1011 10 : data tmpi 
13*b0000101110000 : dataltmpi 

13'b00001011100z1 :data tmpi 
13'b0000101110z10 : data~tmp1 
13'b000010111010z : data tmpi 
13'b0000101110111 :data~tmp1 



13'b00001011110z2 
13'b000010111110z 
13'b0000101111110 



data_tmp1 
data_tmp1 
data_tmp1 



= 10'bOIOIOOOIIO; 
= 10'bOIOIOOOIIO- 
= lO'bOIOIOOOHO; 

= lO'bOIOIOOOIII; 
= lO'bOIOIOOOIH; 
= 10'bOI 010001 11; 
= lO'bOIOIOOOHI; 

= 10'bOIOIOOIOOO; 
= 10'bOIOIOOIOOO; 
= 10'b0101001000; 

= 10'bOIOIOOIOOI; 
= 10'bOIOIOOIOOI; 
= 10'b0101001001; 

= 10'bOIOIOOIOIO; 
= 1O'bO101001O10; 
= 10'bOIOIOOIOIO; 

= 10*b0101001011; 

■ 10'bOIOIOOIOII; 

= 10'b0101001100; 
= 10'bOIOIOOIIOO; 
= 10'b0101001100; 

= 10'b0101001101; 

■ 10'bO1O1OO11O1 

= lO'bOIOIOOIIOI; 

= 10'b0101001110; 
= lO'bOIOIOOIHO; 
' lO'bOIOIOOmO; 
= lO'bOIOIOOIHO; 

■■ 10*b0101001111; 
lO'bOIOIOOmi; 
: 10'b0101001111; 
• 10'b0101001111; 

10'bOIOIOIOOOO; 
10'bOIOIOIOOOO; 
10'bOIOIOIOOOO; 
10'bOIOIOIOOOO; 

10'bOIOIOIOOOI; 
10'bOIOIOIOOOI; 
10'bOIOIOIOOOI; 



13'b0000101111111 :data_tmp1 = 10'bO10101OO10; 
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13*b00001100000zz : data_tmp1 = 10'bOlOIOIOOIO; 
13'b00001 1 00001 Oz : data_tmp1 = 10'b0101010010; 

13'b00001 100001 1z : data_tmp1 = 10'b0101010011; 
13'b00001100010zz : data_tmp1 = 10'bOIOIOIOOII; 

13'b00001100011zz : data_tmp1 = 10'b0101010100; 
13'b000011001000z : data_tmp1 = 10'bOIOIOIOIOO; 
13'b00001 1001 0010 :data_tmp1 = 10'b0101010100; 



13'b0000110010z11 :data_tmp1 = 10'b0101010101; 
13'b000011001010z : data_tmp1 = 10'b0101010101; 
13'b0000 110010110 :data_tmp1 = 10'b0101010101; 
13'b000011001100z : data_tmp1 = 10'b0101010101; 
15 I3'b00001 1001 1010 : data_tmp1 = 10*b0101010101; 

13'b0000110011z11 :data_tmp1 = 10'b0101010110; 
13'b000011001110z : data_tmp1 = 10'b0101010110; 
13'b0000110011110 :data_tmp1 = 10'b0101010110; 
20 13*b000011010000z : data_tmp1 = lO'bOIOIOIOHO; 

13'b0000110100z1z : data_tmp1 = 10'b0101010111; 
13'b000011010010z : data_tmp1 = 10'bOIOIOIO1 11; 
13'b00001 10101000 : data_tmp1 = 10'b0101010111; 

25 

13'b00001101010z1 :data_tmp1 = 10'bOIOIO1 1000; 
13'b0000110101z10 : data_tmp1 = 10'bOIOIO1 1000; 
13'b000011010110z : data_tmp1 = 10'bOIOIO1 1000; 
13'b00001 101011 11 :data_tmp1 = 10'bOIOIO1 1000; 
30 13*b00001 101 10000 : data_tmp1 = 10'b010101 1000; 

13'b00001101100z1 ;data_tmp1 = 10'bOIOIO1 1001; 
13'b0000110110z10 :data_tmp1 = 10'bO101O110O1; 
13'b000011011010z : data_tmp1 = 10'bOIOIOIIOOI; 
35 13'b0000110110111 : data_tmp1 = 10'b010101 1001; 
13'b00001 1011 1000 : data_tmp1 = 10'bOIOIO1 1001; 

13'b00001101110z1 :data_tmp1 = 10'b0101011010; 
13'b0000110111z10 : data_tmp1 = 10'b010101 1010; 
40 13'b000011011110z : data_tmp1 = 10'bOIOIO1 1010; 
13'b0000110111111 :data_tmp1 = 10'bO101O1 1010; 

13'b0000111000zzz : data_tmp1 = 10'b0101011011; 

45 13'b0000111001zzz : data_tmp1 = 10'bOIOIO1 1 100; 

13'b0000111010zzz : data_tmp1 = 10'bOIOIO1 1 101; 
13'b00001 1101 1000 : data_tmp1 = 10'bOIOIO1 1 101; 

50 13'b00001110110z1 : data_tmp1 = 10'b0101011110; 
13'b0000111011z10 : data_tmp1 = 10'bOIOIO1 1 1 10; 
13'b000011101110z:data_tmp1 = 10'bO101O1111O; 
13'b0000111011111 :data_tmp1 = 10'bO1O1O1 1110; 
13*b00001 11 100000 : data_tmp1 = 10'bO101O1111O; 

55 

13'b00001111000z1 :data_tmp1 = 10'b0101011111; 
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13'b0000111100z10 
13'b000011110010z 
13*b0000111100111 
13'b000011110100z 

13'b0000111101z1z : 
13'b000011110110z 
13'b000011111000z : 

13'b0000111110z1z : 
13'b000011111010z ; 
13'b000011111100z : 
13'b0000111111010 

13'b0000111111z11 : 
13'b000011111110z : 
13*b0000111111110 : 
13"b00010000000zz : 



PCT/US97/189n 



: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 



13'b0001 000000 1zz : data_tmp1 
1 3*b0001 00000 1 0zz : data tmpi 
1 3'bOO0 100000 11 00 : data tmpi 



13'bOO010O0O011z1 
13'b0001000001110 
13'b0001 00001 OOzz 
13'b0001 00001 01 Oz 
13"b0001000010110 



: data_tmp1 
: data_tmp1 
; data_tmp1 
: data_tmp1 
: data_tmp1 



13'b000100001z111 :data_tmp1 
13'b00010000110zz : data_tmp1 
1 3'b0001 00001 11 Oz : data_tmp1 
13'b0001000011110 : data_tmp1 

13'b0001000100zzz : data_tmp1 
13'b000100010100z : data_tmp1 



13'b0001000101z1z 
13'b000100010110z 
13'b000 1000 11 OOzz 



data_tmp1 
data_tmp1 
data_tmp1 



13'b00010001101zz ; data tmpi 
1 3'bOO0 10001 11 Ozz : data~tmp1 
1 3'bOO0 1 000 1 1 1 1 0z : data-tmp 1 



13'b000100011111z 
13'b0001001000zzz : 



data_tmp1 
data_tmp1 



13'b0001001001zzz:data tmpi 
13'b000100101000z : data_tmp1 



122 

= 10'b0101011111 
= 10'bOIOIOIIIII 
= 10'b0101011111 
= 10'bOIOIOIIIII 

= 10'bOI 01 100000; 
= 10'b0 101 100000: 
= 10'bOI 01 100000; 

= 10'bOI 01 100001 
= 10'bOI 01 100001 
= 10'bOI 01 100001 
= 10'bOI 01 100001 

= 10'bOI 01 100010; 
= 10'bOI 01 100010; 
= 10'bOIOIIOOOIO; 
= 10'bOIOIIOOOIO; 



■ lO'bOl 01 100011 
• 10'bOI 01 100011 
= 10'bOI 01 100011 

= 10'b0101100100 
= 10'bOIO1 100100 
10'bOIO1 100100 

■ 10'bOI 01 100100 
: 10'bOIOIIOOIOO 

10'bO1O110O1O1; 
lO'bOl 01 100101; 
lO'bOIOIIOOIOI; 
■■ 10'bOIOIIOOIOl; 

10'bO1O11OO110; 
lO'bOIOIIOOIIO; 

lO'bOIOIIOOm 
lO'bOIOIIOOIII 
1d'bO10110O111 



lO'bOIOIIOIOOO; 
lO'bOIOIIOIOOO; 
10'bOIOIIOIOOO; 

lO'bOIOIIOIOOl; 
10'bO1011O1OO1; 

10'bO1011O1O10; 
10'b0101101010; 



13'b0001001010z1z : data tmp1 
13'b000100101010z : data~tmp1 
13'b000 100 1011 Ozz : data "tmpi 
13'b0001001011100 ~ " 



10'bOIOIIOIOII 
10'bO1011O1O11 
_ . 10'b0101101011 
data_tmp1 = 10'bOI 01 101 Oil 
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13'b00010010111z1 
13'b0001001011110 
13'b00010011000z2 : 
13*b000100110010z 
13'b0001001100110 



data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 



1 3'b0001 001 1 0zl 1 1 : data_tmp1 
13*b00010011010zz : data_tmp1 
13'b000100110110z : data_tmp1 
13'b0001001101110 : data_tmp1 
13'b000100111000z : data_tmp1 

13*b0001001110z1z : data_tmp1 
13'b000100111010z : data_tmp1 
13'b00010011110zz : data_tmp1 
13'b0001001111100 : data_tmp1 



13*b00010011111z1 
13'b0001001111110 
13'b0001010000zzz : 
13'b0001010001000 



data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 



13'b00010100010z1 :data_tmp1 
13'b0001010001z10 : data_tmp1 
13'b000101000110z : data_tmp1 
13'b0001 01 0001111 :data_tmp1 
13'b00010100100zz : data_tmp1 



13'b000101001z1zz : 
13'b00010100110zz : 

13'b0001010100zzz: 
13'b00010101010zz: 

13'b00010101011zz : 
13'b0001010110zzz: 

13'b0001010111zzz: 
13'b00010110000zz : 

13'b000101100z1zz : 
13'b00010110010zz: 
13'b000101 1010000 



data_tmp1 = 
data_tmp1 ■ 

data_tmp1 = 
data_tmp1 

data_tmp1 
data_tmp1 ■■ 

data_tmp1 • 
data_tmp1 

data_tmp1 
data_tmp1 
: data_tmp1 



13'b00010110100z1 :data_tmp1 
13'b0001011010z10 : datajmpi 
13'b000101101z10z : datajmpi 
13'b0001011010111 : datajmpi 
13'b00010110110zz : datajmpi 



13'b000101101111z 
13'b0001011100zzz: 
13'b000101110100z 
13'b000101 1101010 



datajmpi 
datajmpi 
datajmpi 
datajmpi 
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lO'bOIOIIOIlOO 
lO'bOIOHOIlOO 
1O'b01011011OO 
lO'bOIOIIOIlOO 
1O'b01011011OO 

10'b0101101101 
10'b0101101101 
10'b0101101101 
10'b0101101101 
1O'b01O11011O1 



10'b0101101110; 
1O'bO10110111O; 
1O'b010110111O; 
10'b0101101110; 

10'b0101101111; 
10'b0101101111; 
10'b0101101111: 

■ io*bOioiioiiii: 

lO'bOIO1 110000 
10'bOIO1 110000 
10'bOIOIIIOOOO 
■■ 10'bO101110OOO 
10'b0101110000 

10'b0101110001: 
10'bOIO1 110001; 

io*boioiiiooio: 

10'bOIO1 110010; 

10'b0101110011; 
1O'b010111OO11; 

1O'b010111O1OO: 
■■ 1O'bO10111O1OO; 

10'b0101110101 
: 10'b0101110101 
= 10'bO10111O1O1 

= 10'bO10111O11O 
= 10'bO10111O11O 
= 10'b0101110110 
= 10'b010l110110 
= 10'b0101110110 



10'b0101110111; 
10'bOIOIIIOIII; 
10'b0101110111; 
■■ 10'b0101110111; 



13'b0001011101z11 : datajmpi = 10*bO10111 1000; 
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13'b000101 1101102 
13'b000101 1101 110 
13*b00010111102zz : 
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data_tmp1 
clata_tmp1 
data_tmp1 



1 3*b000 1 0 1 1 1 1 1 ZZ2 : data_tmp 1 
1 3'bOOO1 1 0OOOOOzz : data tmp1 
1 3*b000 11 000001 00 : data tmpi 
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lO'bOIOIinoOO; 
10'bOIOIIIIOOO: 
10'bOIOIIIIOOO; 



lO'bOIOimOOl 
10'b0101111001 
10'bOIOIIIIOOI 



13'b0001 
13'b0001 
13'b0001 
13'b0001 
13'b0001 
13*b0001 
13'b0001 



1 000001 z1 
IOOOO2IIO 
1 00001 Ozz : 
1 00001 lOz 
100001111 
10001000Z 
100010010 



13'b0001100010z11 
13*b000110001z102 
13'b000110001z110 
13'b0001 100011 Ozz 
13'b0001100011111 
13'b0001 100100000 

13'b00011001000z1 
13'b0001100100z10 
13'b000110010z10z 
13'b0001 1001001 11 
13'b00011001010zz 
13'b0001 100101 110 



data_^tmp1 
data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 

: data__tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 ■ 
: data_tmp1 



10'bOIOII 
lO'bOIOH 
10'bOIOII 
lO'bOIOH 
lO'bOIOH 
10'bOIOII 
1O'bO1011 



11010 
11010 
11010 
11010 
11010 
11010 
11010 



13'b0001 1001011 11 :data_tmp1 
13'b0001 1001 lOzzz : data tmpi 
13'b00011001110z2 : data~tmp1 
13'b000110011110z : data~tmp1 

13'b0001 1001 111 1z : data_tmp1 
13*b0001101000zzz : data tmpi ■■ 
13*b00011010010zz : data"tmp1 
13'b0001 101001 100 : data_tmp1 



■ 10'b0101111011 
= 10'b0101111011 
= 10'bOIOI1 11011 
•■ 10'bOIOIIIIOII 
= 10'b0101111011 
= 10'b0101111011 

= 10'bOIOIIIIIOO 
= 10'bOIOIIIIIOO 

10'bOIOIIIIIOO 
: 10'bOIOIIIIIOO 

10'bOIOIIIIIOO 
= 10'b0101111100 

: lO'bOIOinHOI; 
10'bOIOIIIIIOI; 
10'bOIOIIIIIOI; 
10'bOIOIIIIIOI; 

10'bOIOIIIIIIO; 
10'b0101111110; 
10'b0101111110; 
■■ 10'b0101111110; 



13'b0001 101001 1z1 :data_tmp1 
13'b0001 101001 110 : datajmpi 
13'b0001101010zzz : data tmpi 
13'b0001 10101 lOzz 



10'bOIOII 111 11; 
10'b0101111111; 
10'b0101111111; 
data_tmp1 = 1 0'bOl 01 111111; 



13'b00011010111zz 
13'b0001101100zzz : 
13'b000110110100z 
13'b0001101101010 

13'b000110110l2l1 
13'b000110110110z 
13'b0001101101110 
13'b0001101110zzz : 
13'b000110111100z : 



data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 



10'b0 110000000; 
10'bO1 10000000; 
10'b0 110000000; 
= 10'b0 110000000; 

10'bO1 10000001; 
10'b0 11 0000001; 
■■ 10'bO1 10000001; 
10'b0 110000001; 
10'bO1 10000001; 
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13*b0001101111z1z : data_tmp1 
1 3'bOO0 1 1 0 11 11 1 0z : data_tmp 1 
13'b0001110000zzz : data_tmp1 
13'bOOOIIIOOOIOOz : data_tmp1 

5 

13'b0001110001z1z : data_tmp1 
1 3'bOO0 1 1 1 000 1 1 0z : data_tmp 1 
13*b0001 IIOOIOzzz : data_tmp1 
13'b000111001100z : data_tmp1 

10 

13'b0001110011z1z : datajmpi 
13'b000111001110z : data_tmp1 
13'b0001110100zzz : data_tmp1 
13*b000111010100z : data_tmp1 
15 13'b0001 110101010 : data_tmp1 

13'b0001110101z11 :data_tmp1 
13'b000111010110z : data_tmp1 
13'b0001 110101 110 : data_tmp1 
20 1 3'bOO0 1 1 1 0 1 1 0zzz : data_tmp 1 
13'b000111011100z : data_tmp1 
13'b0001110111010 : data_tmp1 

13'b0001110111z11 : data_tmp1 
25 1 3'bOO0 1 1 1 0 1 1 1 1 0z : data_tmp 1 
13'b0001110111110 : data_tmp1 
13'b0001 1 1 lOOOzzz : data_tmp1 
13'b0001 1 1 lOOIOzz : data_tmp1 

30 13'bO0011110011zz : data_tmp1 
13'b0001111010zzz : data_tmp1 
1 3*b0001 1 1 1 01 1 0zz : data_tmp1 
13'b0001111011100 : data_tmp1 

35 13'b00011110111z1 : data_tmp1 
13'b0001 1 1 101 1 1 10 : data_tmp1 
13'b0001 1 1 1 lOOzzz : data_tmp1 
13'b0001 1 1 1 lOIOzz : data_tmp1 
13'b000111110110z : data_tmp1 

40 13'b000111 1 101110 : data_tmp1 

13'b0001 1 1 1 1z1 1 1 1 : data_tmp1 
13'b0001 1111 lOzzz : data_tmp1 
13'b0001 1 1 1 1 1 lOzz : data_tmp1 
45 13'b000111111110z : data_tmp1 
13'b0001111111110 : data_tmp1 
13'b00 10000000000 : data_tmp1 

13'b00100000000z1 : data_tmp1 
50 1 3'b001 OOOOOOOzl 0 : data_tmp1 
13'b001000000z10z : data_tmp1 
13'b001000000z111 :data_tmp1 
13'b001 000000 lOzz : data_tmp1 
13'b0010000001110 : data_tmp1 
55 1 3'b001 000001 OOOz : data_tmp1 
13'b0010000010010 : data_tmp1 
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10'bO1 10000010; 
10'bO1 10000010; 
10'bO1 10000010; 
10'bO1 10000010; 

10'bO1 10000011; 
10'bO1 10000011; 
10'bO1 10000011; 
10'bO1 10000011; 

10'bO1 10000100; 
10'bO1 10000100; 
10'bO1 10000100; 
10'bO1 10000100; 
10'bO1 10000100; 

10'bO1 10000101; 
10'bO1 10000101; 
10'bO1 10000101; 
10'bOIIOOOOIOI; 
10'bO1 10000101; 
10'bO1 10000101; 

10'bO1 100001 10; 
10'bO1 100001 10; 
10'bO1 100001 10; 
10'bO1 100001 10; 
10'bO1 100001 10; 

10'bO1 100001 11; 
10'bOII 0000111; 
10'bO1 100001 11; 
10'bO1 100001 11; 

10'bO1 10001000; 
10'bO1 10001000; 
10'bO1 10001000; 
10'bO1 10001000; 
10'bO1 10001000; 
10'bO1 10001000; 

10'bO1 10001 001; 
10'bO1 10001 001; 
10'bO1 10001001; 
10'bO1 10001001; 
10'bO1 10001001; 
10'bOIIOOOIOOI; 

10'bO1 10001010; 
10'b0110001010; 
10'bO1 10001010; 
10'bO1 10001010; 
10'bOIIOOOIOIO; 
10'bO1 10001010: 
10'bO1 10001010; 
■■ 10'bO1 10001010; 
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1 3'b001 00000 10z11 
13'b001 000001 2IO2 
13'b001 000001 z1 10 
1 3'b001 00000 IIOzz 
13'b0010000011111 
13'b001000010002Z 
13'b0010000100102 
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: clata_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 



10'bOII 
10'bOII 
10'b011 
10'bOII 
10'b011 
10'bOII 
10'bOII 



0001011; 
0001011; 
0001011; 
0001011; 
0001011; 
0001011; 
0001011; 



13'b001000010z1iz : data_tmp1 
13'b001 00001 01 Ozz : data_tmp1 
1 3'b001 00001 01 lOz : data_tmp1 
13'b001 000011 Ozzz : data_tmp1 

13'b00100001 1 1zzz : data_tmp1 
13'b0010001000zzz : data_tmp1 
13'b00 1000 1001 Ozz : data_tmp1 

1 3'bO0 10001 00 lizz : data_tmp1 
13'b001 0001 01 Ozzz : data_tmp1 
1 3'bO0 1 000 1 0 1 1 0zz : data tmp 1 
13'b001000101110z : data~tmp1 
1 3'bO0 1 000 1 0 1 1 1 1 0 : data_tmp 1 

13'b0010001011111 :data_tmp1 
1 3'b001 000 1 1 0zzzz : data tmpi = 
13'b00 10001 1 lOOOz : data_tmp1 
13'b0010001 110010 : data_tmp1 

13'b0010001110z11 :data tmp1 
1 3'bO0 1 000 1 1 1 z1 Oz : data_tmp 1 ■■ 
13'b001000111z110 : data tmp 1 
13'b00100011110zz : data_tmp1 ■■ 
13'b0010001111111 :data_tmp1 
13'b00100100000zz : data_tmp1 ■ 
13'b00 1001 00001 Oz : data_tmp1 
13'b001 001 00001 10 : data_tmp1 

I3'b001001000z111 :data_tmp1 ■■ 
13'b00100100z10zz : data tmp1 = 
1 3'bO0 1001 000 lIOz : data_tmp1 = 
13'b001001 0001 110 : data_tmp1 
13'b00 100 1001 Ozzz : data_tmp1 = 

13'b001 001 001 lizz : data_tmp1 = 
13'b001001010zzzz : data tmpi = 
13'b00100101 10000 : data" tmp1 ^ 



= 10'bO1 10001 100; 
= 10'bO1 10001 100; 
= 10'bO1 10001 100; 
10'bO1 10001 100; 

10'bO1 10001 101; 
10'bOII 0001 101; 
■■ 10"b0110001101; 

10'bO1 10001 110; 

10'bO1 10001 110; 

10'bO1 10001 110; 
= 10'bO1 10001 110; 
= 10'bO1 10001 110; 

= 10'bO1 10001 111; 
10'bOIIOOOIIII; 
• lO'bOl 10001 111; 
■ 10'bO1 10001 111; 



10'bOI 
10'bOI 
lO'bOl 
lO'bOl 
lO'bOl 
lO'bOl 
lO'bOl 
lO'bOl 



10010000; 
10010000; 
10010000; 
10010000; 
10010000; 
10010000; 
10010000; 
10010000; 



= 10'bO1 10010001; 

10'bO1 10010001; 
= 10'bO1 10010001; 
= 10'bO1 10010001; 

10'bO1 10010001; 

10'bO1 10010010; 
10'bO1 10010010; 
= 10'bO1 10010010; 



13*b001001 
13'b001001 
13'b001001 
13'b001001 
13'b001001 
13'b001001 
13'b001001 
13'b001001 



01100Z1 
OIIOzIO 
OllzIOz 
OUzlll 

omozz 

0111110 
lOOOOzz 
lOOOIOz 



: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 



lO'bOH 
10'bOII 
lO'bOII 
10'bOII 
10'bOII 
10'bOII 
10'bOII 
10'bOII 



0010011; 
0010011; 
0010011; 
0010011; 
0010011; 
0010011; 
0010011; 
0010011; 
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13*b001001100z11z : data_tmp1 
13'b00100110z10zz : data_tmp1 
13'b001 0011 001 lOz : data_tmp1 
13'bOO1OO11O10zzz : data_tmp1 



data_tmp1 
data_tmp1 
: data_tmp1 



13'b00100110111zz : 
13'b001001110zzzz : 
13'b001001111000z 

13"b0010011110z1z 
13'b001001111z10z 
13'b00100111110zz 
13'b001001111111z 
13'b0010100000zzz : 



data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 



13'b0010100001zzz : data_tmp1 
13'b0010100010zzz : data_tmp1 
1 3'bO0 101 0001 10zz : data_tmp1 
13'b001010001110z : data_tmp1 
13'b0010100011110 : data_tmp1 



13'b0010100011111 
13'b001010010zzzz : 
13*b00101001100zz : 
13'b001010011010z 

13'b001010011z11z ; 
13'b00101001110zz : 
13'b001010011110z 
13'b0010101000zzz : 
13'b00101010010zz 
13'b001010100110z 



13'b0010101 
13'b0010101 
13'b0010101 
13'b0010101 
13'b0010101 
13'b0010101 



Oz111z 
OlOzzz 
OIIOzz 

omoz 

lOOOzz 
lOOIOz 



13'b001010110z11z : 
13'b00101011z10zz : 
13'b00101011z110z : 
13'b0010101110zzz : 
13'b0010101111110 

13*b0010101111111 
13'b001011000zzzz : 
13'bO010110O10zzz : 

13'b0010110011zzz: 
13'b001011010zzzz: 
13'b00101 101 10000 

13'b00101101100z1 
13'b0010110110z10 



: data_tnnp1 ■ 
data_tmp1 = 
data_tmp1 = 

: data_tmp1 = 

: data_tmp1 = 
: data_tmp1 = 
: data_tmp1 ■ 
data_tmp1 = 
; data_tmp1 = 
: data_tmp1 ■ 

: data_tmp1 = 
; data_tmp1 = 
: data_tmp1 = 
: data_tmp1 
: data_tmp1 ■ 
: data_tmp1 

: data_tmp1 
: data_tmp1 = 
: data_tmpl 
data_tmp1 = 
; data_tmp1 

: data_tmp1 
data_tmp1 = 
data_tmp1 

data_tmp1 
data_tmp1 ■ 
: data_tmp1 

: data_tmp1 
: data_tmp1 
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10'bO1 10010100; 
10'bO1 10010100; 
10'bO1 10010100; 
10'bOIIOOIOIOO; 

10'bO1 10010101; 
10*b0110010101; 
10'bOIIOOIOIOI; 

10'bO1 100101 10 
10'bO1 100101 10 
10'bO1 100101 10 

■ 10'bO1 100101 10 
10'bO1 100101 10 

lO'boiiooiom 

10'b0 110010111 
10'bO1 100101 11 

■ 10'bO1 100101 11 
: 10'bO1 100101 11 



= 10'bO1 1001 1000; 

10'bO1 1001 1000; 

10'bO1 1001 1000; 
■■ 10'bO1 1001 1000; 

10'bO1 1001 1001 
10'bO1 1001 1001 
: 10'bO1 10011001 
10'bO1 1001 1001 
■ 10'bO1 1001 1001 
: 10'bO1 1001 1001 

= 10'bOIIOOIIOIO 
10'bOIIOOIIOIO 
■■ 10'bOIIOOIIOIO 
: 10'bOIIOOIIOIO 
= 10'bOIIOOIIOIO 
: lO'bOl 1001 1010 

: 10'bO1 1001 1011 
= 10'bO1 1001 1011 
: 10'bO1 1001 1011 
= 10'bO1 1001 1011 
= 10'bOIIOOIIOII 



: 10'bO1 1001 1100; 
10'bO1 1001 1100; 
10'bO1 1001 1100; 

10'b0110011101; 
10'bOIIOOIIIOI; 
: lO'bOl 1001 1101; 

■ 10'b0110011110; 
= 10'b0110011110; 
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13'b00101 
13'b00101 
13'b00101 
13'b00101 
13'b00101 
13'b00101 
13'b00101 

13'b00101 
13'b00101 
13'b00101 
13'b00101 
13'b00101 
13'b00101 
13'b00101 
13'b00101 



1011Z102 

IOII2III 

1011102Z 

10111110 

110002Z2 

IIOOIOOz 
11001010 

11001z11 
HOzlIOz 
IIOzlllO 

noiozzz 

110110Z2 

11011111 

mooozz 

11100100 



: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
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= 10'b0110011110 
= 10'bOIIOOIIIIO 
= 10'bOIIOOIIIIO 
= 10'b0110011110 
= 10'b0110011110 
= 10'bOIIOOIIIIO 
= 10'bOIIOOIIIIO 



13'b00101111001z1 
13'b001011110z110 
13'b00101111z10zz 
13'b00101111z110z 
13'b00101111z1111 
13'b0010111110zzz 
13'b0010111111110 



: data 
: data 

data^ 
: data' 
: data 

data^ 
: data' 



_tmp1 
_tmp1 
tmpi 
.tmpi 
_tmp1 
_tmp1 
i_tmp1 



■■ 10*b01 
10'bOI 

= 10'bOI 
10'bOI 
10*b01 

= 10'bOI 
10'bOI 

= 10'bOI 

10'bOI 
10'bOI 
10'bOI 
10'bOI 
10'bOI 
10'bOI 
10'bOI 



10011111 
10011111 
10011111 
10011111 
10011111 
10011111 
10011111 
10011111 

10100000 
10100000 
10100000 
10100000 
10100000 
10100000 
10100000 



13'b001100000zzzz : data_tmp1 
13'b001 1 00001 Ozzz : data_tmp1 
1 3'b001 1 00001 1 0zz : data_tmp1 



13'b001 100001 11 zz 
13'b001100010zzzz : 
13'b001 10001 lOOzz 
13'b001 10001 lOIOz 
13'b001 10001 101 10 

13'b001 10001 1z1 11 
13'b00110001110zz 
13'b001 100011 110z 
13'b001 1000111 110 
13'b001100100zzzz 
13'b00110010100zz 



data_tmp1 
data_tmp1 
data_tmp1 
data_tmpl 
data_tmpl 

: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 = 
: data_tmp1 



13'b001 1 001 Olzizz : data tmpi 
13'bO011OO1O110zz : data~tmp1 
13'b001 1001 10ZZ2Z : data_tmp1 

1 3'b0011 001 1 1zzzz : data tmpi 
13'b0011010000zzz : data~tmp1 
13'b001 101 0001 Ozz : data~tmp1 
13'b001 1010001 lOz : data^tmpl 

13'b001 101 OOzl 1 1z : data tmpi 
13'b0011010010zzz : data~tmp1 
13'b001 101 0011 Ozz : data~tmp1 
13'b001 101001 11 Oz : data~ttYip1 
13'b0011010100zzz : data~tmp1 



10'bO1 10100001 
■■ 10'bO1 10100001 
= 10'bO1 10100001 

= 10'bO1 10100010; 
10'bO1 10100010: 
• 10'bO1 10100010; 
= 10'bO1 10100010; 
= 10'bO1 10100010; 

= lO'bOIIOIOOOH; 

10'bOIIOIOOOII; 
= 10'bO1 10100011; 
: 10'bO1 10100011; 

10'bO1 10100011; 

10'bO1 101 00011; 

10'bO1 10100100; 
10'bO1 10100100; 
10'b0110100100; 



10'bO1 10100101 
10'bO1 10100101 
10'b0110100101 
10*b0110100101 

10'b0110100110 
1O'b0110100110 
10'b0110100110 
10'bOIIOIOOIIO 
10'bO1 101 001 10 
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data_tmp1 = 10'bO1 101001 10; 
data_tmp1 = 10'bO1 101001 10; 



13*b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 

13'b001 
13'b001 
13*b001 
13'b001 
13'b001 
13'b001 
13'b001 

13'b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 
13*b001 



1010101Z11 
10101z110z 
10101Z1110 
lOIOIIOzzz 
10101110ZZ 
1010111111 
lOIIOOOzzz 
1011 001 OOz : 

1011001z1z : 
10110z110z : 
lOIIOIOzzz: 
10110110ZZ : 
101101111Z 
lOm OOzzz : 
1011101000 

10111010Z1 

lomoizio 

10111z110z 
10111Z1111 
1011110ZZZ : 

lomnozz 

1011111110 
IIOOOOOzzz 



13*b00111000z1zzz 
13'b0011100010zzz 
13*b0011100100zzz 



: data_tmp1 = 
; data_tmp1 = 
: data_tmp1 = 
data_tmp1 = 
: data_tmp1 = 
: data_tmp1 
: data_tmp1 = 
: data_tmp1 ■ 

: data_tmp1 ■ 
: data_tmp1 ■ 
: data_tmp1 = 
: data_tinp1 ■ 
data_tmp1 
data_tmp1 = 
: data_tmp1 

: data_tmp1 
: data_tmp1 
data_tmp1 
: data_tmp1 
data_tmp1 ■ 
: data_tnnp1 
: data_tmp1 
data_tmp1 

data_tmp1 • 
: data_tmp1 
: data_tmp1 



10'bOI 
10'bOI 
10'bOI 
10'bOI 
10'bOI 
: 10'bOI 
10'bOI 
10'bOI 



10100111 
10100111 
10100111 
10100111 
10100111 
10100111 
10100111 
10100111 



13'b00111001z1z2z : data_tmp1 = 
13'b0011100110zzz : data_tmp1 ■■ 
13'b0011101000zzz : data_tmp1 

13'b00111010z1zzz : data_tmp1 ■ 
13'b0011101010zzz : data_tmp1 
13'bO011101100zzz : data_tmp1 
13'b0011101101000 : data_tmp1 



13'b001 
13'b001 
13'b001 
13"b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 



11011010z1 
1101101Z10 
11011z110z 
11011Z1111 
1101110ZZZ 
11011110ZZ 
1101111110 
mOOOOzzz 
11 10001 OOz 
1110001010 



: data_tmp1 
: data_tmp1 
; data_tmp1 
: data_tmp1 
data_tmp1 
: data_tmpl 
: data_tmp1 
; data_tmp1 
: data_tmp1 
: data_tmp1 



10'bO1 10101000 
10'bOIIOIOIOOO 
10'bO1 10101000 
10'bO1 101 01 000 
10'bO1 10101000 
10'bO1 101 01 000 
: 10'bOIIOIOIOOO 

10'bOIIOIOIOOI 
lO'bOHOIOIOOl 
10'bO1 101 01 001 

■■ lO'bOHOIOIOOl 
10'b0110101001 
10'bOIIOIOIOOI 

: 10'bO1 10101001 
10'bOIIOIOIOOI 

10'bOIIOIOIOIO 
10'bOIIOIOIOIO 
10'bOIIOIOIOIO 

1O'b01101O1O11 
■■ 10'b0110101011 
: 10'bOIIOIOIOII 



10'b0110101100; 
10'bOIIOIOIIOO; 
10'bOIIOIOIIOO; 
: 10'bOIIOIOIIOO; 

■■ 10'bOIIOIOIIOI 
= 10'b0110101101 
■■ 10'bOIIOIOIIOI 
: 10'bOIIOIOIIOI 

10'bOIIOIOIIOI 
: 10'bOIIOIOIIOI 
■■ 10'bOIIOIOIIOI 

10'bOIIOIOIIOI 
= 10'bOIIOIOIIOI 
= 10'b0110l01101 



13'b0011110001z11 
13*b00111100z110z 
13'b00111100z1110 



data_tmp1 = 10'bO1 10101 110; 
data_tmp1 = 10'bO1 10101 110; 
data_tmp1 = 10'bO1 10101 110; 
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13'b0011110010zz2 
13'b0011110dl10zz 
13'b0011110011111 
13'b0011110100zzz 
13'b00111101010zz 
13'b0011 110101100 
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13*b00111 
13'b00111 
13'b00111 
13'b00111 
13'b00111 
13'b00111 
13'b00111 



lOIOHzl 
lOlzlllO 

10110ZZ2 

loinozz 
loimoz 

10111111 

1100Z2Z2 



13'b001111101zzzz: 
13*b001111110zzzz ; 
13'b00111111100zz 



: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 
: data_tmp1 • 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 = 

data_tmp1 = 
data_tmp1 = 
data_tmp1 ■ 



13'b0011 1 111 Izizz : data tmpi 
1 3'b001 1 1 1 1 1 1IOzz : dataltmpi 
13*b010000000zzzz : data_tmp1 
13'b01 000000 lOzzz : data_tmp1 

-13'b0 1000000 11 zzz : data_tmp1 
13'b01 000001 Ozzzz : data_tmp1 
1 3'b0 1 00000 1 1 0zzz : data tmp 1 
1 3'b01 000001 1 1 0zz : data tmpi 
13'b0100000111100 : data_tmp1 

1 3'b01 000001 11 1z1 : data tmpi 
13'b0100000111110 : data_tmp1 
13'b01000010zzzzz : data tmpi = 
13'b0100001 100002 : data_tmp1 
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10'b0110101110; 
10'b0110101110; 
10'bOIIOIOIIIO; 
10'bOIIOIOIIIO; 
10'b0110101110; 
10'bO1 10101 110; 



= 10'bOIIOIOIIII 
= 10'b0110101111 
• 10'bOIIOIOIIII 
= 10'bO1101O1111 
= 10'b0110101111 
= 10'bOIIOIOIIII 
10'b0110101111 

10'bO1 101 10000; 
10'bO1 101 10000; 
10'bO1 101 10000; 

10'b0110110001; 
10'bO1 101 10001; 
10'bOIIOIIOOOI; 
10'b0110110001; 



■■ 10'b0110110010 
10'b0110110010 
10'b0110110010 
= lO'bOHOIIOOlO 
= 10'b0110110010 

= 10'bOIIOIIOOII; 
= 10'b0110110011; 
10'b0110110011; 
= 10'bO11011O011; 



1 3'b01 00001 lOOzIz 
13'b010000110z102 
13'b01000011z10z2 
13'b01000011z11l2 
1 3'b0 100001 11 Ozzz 
13'b010000111110z 
13'b0100010000zzz 

13'b01000100z1zzz : 
13'b0 1000 1001 Ozzz : 
13'b0 10001 01 OOzzz : 
13'b01 0001 0101 Ozz 
13'b010001010110z 
13'b0100010101110 



13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 



OOOIOIzim 
0001011 Ozzz 
00010111 Ozz 
000101 IIIOz 
00010111110 
OOOIIOOzzzz 



: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 

data_tmp1 
: data_tmp1 
; data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 ■■ 
: data_tmp1 
: data_tmp1 
: data_tmp1 
data_tmp1 = 



10'bOI 
10'bOI 
10'bOI 
10'bOI 
10'bOI 
10'bOI 
10'bOI 



10110100 
10110100 
10110100 
10110100 
1011010O 
10110100 
10110100 



10'b0110110101 
10'b0110110101 
10'bOIIOIIOIOI 

■ 10'bOIIOIIOIOI 

■ 10'bOIIOIIOIOI 
= 10'bOIIOIIOIOI 

■■ 10'b0110110110; 

10'bO1 101 101 10; 

10'bO1 101 101 10; 
■■ 10'bOIIOIIOIIO; 

■ 10'b0110110110; 
10'b0110110110; 
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13'b01000110100zz : data_tmp1 = 10'bOIIOIIO1 10; 
13'b010001101010z : data_tmp1 = 10*b0110110110; 
13'bO10001 10101 10 : data_tmp1 = lO'bOIIOIIOIIO; 

5 13*b010001101z111 : data_tmp1 = 10'bOIIOIIOIII 
13'b0100011z110z2 : data_tmp1 = 10'b01101101 11 
13'b0100011z1110z : data_tmp1 = 10'b0110110111 
13'b0100011z11110 : data_tmp1 = 10'b0110110111 
1 3'b0 10001 11 Ozzzz : data_tmp1 = 10'b0110110111 
10 13'bO100011110zzz : datajmpi = 10'bOIIOIIOIII 



15 



20 



13'b010001 1111111 :data_tmp1 = 10'b0110111000; 
13'b0 100 100077777 : data_tmp1 = 10'bO1 101 11000; 
13*b010pi00100zzz : data_tmp1 = 10'bO1 101 11000; 

13'b01001001z1zzz : data_tmp1 = 10*b0110111001; 
13'b0100100110zzz : data_tmp1 = 10'bO1 101 11001; 
13'b010010100zzzz : data_tmp1 = 10*b0110111001; 
13'b0100101010000 ; datajmpi = 10'bOIIOIIIOOI; 



13'b01001010100z1 : datajmpi = 10'bOIIOIIIOIO; 
13'b0100101010z10 : datajmpi = 10'bOIIOIIIOIO; 
13'b010010101z10z : datajmpi = 10'b0110111010; 
13'b010010101z111 : datajmpi = 10'bOIIO1 1 1010; 
25 13'b0100101z110zz : datajmpi = 10'bO1 101 11010; 
13'b0100101011110 : datajmpi = 10'bO1 101 11010; 
13'b01 001 011 Ozzzz : datajmpi = 10'bOIIOIIIOIO; 
13'b0100101110zzz : datajmpi = lO'bOl 101 11010; 

30 13'b01001011111zz : datajmpi = 10'b0110111011; 
13'b01001100zzzzz : datajmpi = 10'b0110111011; 
13'b01001101000zz : datajmpi = 10'bOIIOIIIOII; 
13'b010011010010z : datajmpi = 10'bOIIOIIIOII; 
13'b01001 10100110 : datajmpi = 1O'b0110111O11; 

35 

13'b010011010z111 : datajmpi = 10'bOIIOIIIIOO; 
13'b01001101z10zz : datajmpi = 10'b0110111100; 
13'b01001101z110z : datajmpi = 10*b0110111100; 
13'b01001101z1110 : datajmpi = 10'bOIIO1 1 1 100; 
40 1 3'b01 0011 01 lOzzz : datajmpi = 10'b0110111100; 
13'b01001 101111 11 : datajmpi = 10'bOIIOIIIIOO; 
13'b010011100zzzz : datajmpi = 10'bOIIOIIIIOO; 
13'b010011101000z : datajmpi = 10'bOIIOIIIIOO; 
13'b01001 11010010 : datajmpi = 10'bOIIOIIIIOO; 

45 

13'b0100111010z11 : datajmpi = 10'bOIIOI1 1 101 
13'b010011101z10z : datajmpi = 10'b0110111101 
13'b010011101z110 : datajmpi = 10'bOIIOIIIIOI 
13'b0100111z110zz : datajmpi = 10'bOIIOIIIIOI 
50 13'b0100111011111 : datajmpi = 10'b0110111101 
13'b010011110zzzz : datajmpi - 10'bOIIOIIIIOI 
13'b0100111110zzz : datajmpi = 10'bOIIOIIIIOI 
13'b010011111110z : datajmpi = 1O'b01101111O1 
13'b010011 1111110 : datajmpi = 10'bOIIOIIIIOI 
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13'b01010000zzzzz : data_tmp1 = 
13'b0101000100zzz : data_tmp1 
13'b01010001010zz : data tmp1 
13'b0101000101100 : data tmpi 
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13'b0101 
13'b0101 
13'b0101 
13'b0101 
13'b0101 
13'b0101 
13'b0101 
13*b0101 
13'b0101 
13'b0101 

13'b0101 
13*b0101 
13'b0101 
13'b0101 
13'b0101 
13'b0101 
13'b0101 
13"b0101 
13'b0101 



0001011Z1 
OOOIzlllO 
OOOIIOzzz : 
0001 HOzz 

oooimoz 

000111111 
00100ZZZZ : 
OOlOIOzzz : 
00101 lOOz 
001011010 

OOlOllzll 
OOlzllIOz : 

ooizimo : 

OOHOzzzz : 
OOmOzzz : 
OOmiOzz : 
001111111 
OlOOOOzzz : 
OlOOOIOOz : 



13'b0101010001z1z 

13'b01010100z110z 

13'b0101010z10z2z : 

13'b01010100110zz 

13'b010101001111z 

13'b010101010zzzz : 

13'b010101011100z 



: data. 
: dataj 
6aia'_ 
: data] 
: data" 
: data' 
dataj 
data" 
: data~ 
: data] 

: data, 
data] 
: data] 
dataj 
data~ 
data_ 
: data] 
data^ 
data' 

data_ 
data] 
data" 
data_ 
data] 
data^ 
data 



_tmp1 

Jmpi 

_tmp1 

]tmp1 

_tmp1 

_tnnp1 

.tmpi : 

_tmp1 : 

]tmp1 

~tmp1 

_tmp1 
Jtmpi 
_tmp1 
tmpi : 
.tmpi : 
]tmp1 ■■ 
ltmp1 
[tmpi : 
]tmp1 

.tmpi ■■ 
.tmpi ■■ 
]tmp1 = 
[tmpi = 
_tmp1 
tmpi = 
]tmp1 ■■ 



10'bO1 101 11110; 
10'b0110111110; 
10'b0110111110; 
: 10'b0110111110; 



= 10'b0110111111 
: 10'bO1 101111 11 
10'b0110111111 
■■ 10'bOIIO1 11111 
■' 10'bOIIO1 11111 
= 10'b0110111111 
10'b0110111111 
10'b0110111111 
•■ 10'b01101 11111 
= 10'b0110111111 

■■ 10'bO1 11 000000 
10'bO1 11000000 
10'bO1 11000000 
10'bO1 11000000 
10'bO1 11000000 
10'bO1 11000000 

■■ 10'bO1 11 000000 
10'bO1 11000000 
10'bO1 11 000000 



10'bOI 
10'bOI 
10'bOI 
10'bOI 
■■ 10'bOI 
lO'bOl 
10'bOI 



11000001; 
11000001; 
11000001; 
11000001; 
11000001; 
11000001; 
11000001; 



13'b0101010111z1z 

13'b010101011110z 

13'b01010110zzzzz 

13'b0101011100zzz 

13'b010101110100z 

13'b0101011101010 



: data_tmp1 
: data_tmp1 
data_tmp1 = 
: data_tmp1 
: data_tmp1 
: data_tmp1 



13'b0101 
13'b0101 
13'b0101 
13'b0101 
13'b0101 
13'b0101 
13'b0101 
13'b0101 
13'b0101 



oinoizii 

0111z110z 
OHIzlllO 
OimOzzz 

omnozz 

011111111 
lOOOOzzzz : 
lOOOIOzzz : 
10001 lOzz 



; data, 
data] 
data] 
data] 
data] 
: data] 
dataj 
data" 
data" 



_tmp1 

.tmpi 

]tmp1 

tmpi 

.tmpi 

_tmp1 

tmpi = 

tmpi 

.tmpi 



13'b0101100z111zz : data_tmp1 
13'b010110010zzzz : data_tmp1 
13'b0101 1001 lOzzz : data tmpi 
13'b01011001110zz : data_tmp1 
13'b0101101000zzz : data_tmp1 



10'bO1 11000010; 
= 10'bO1 11000010; 

10'bO1 11000010; 

10'bO1 11 000010; 
= 10'bO1 11000010; 
' 10'bO1 11 000010; 



= 10'bO1 11000011 
10'bO1 11000011 

■ 10'bO1 11000011 
10'bO1 11000011 
10'bO1 11000011 

= 10'bO1 11000011 
10'bO1 11 000011 
10'bO1 11000011 
10'bO1 11000011 

10'bO1 11000100 
10'bO1 11000100 
10'bO1 11 0001 00 
10'bO1 11000100 
10'bO1 11000100 
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13*b01011010010zz : data_tmp1 = lO'bOH 1000100; 
13'b0101 101001 lOz : data_tmp1 = 10'bO1 11000100; 
13'b0101101001110 : data_tmp1 = 10'bO1 11000100; 



13'b0101 
13*b0101 
13'b0101 
13'b0101 
13'b0101 
13'b0101 
13'b0101 
13'b0101 



lOIOzim 
lOlzlOzzz : 
101z110zz 
lOlzllIOz 

loizimo 

lOIIOzzzz 
101111111 
1 1 OOOOOOz 



13'b0101 
13*b0101 
13'b0101 
13'b0101 
13*b0101 
13'b0101 
13'b0101 
13'b0101 
13'b0101 
13*b0101 



IIOOOOzIz 
IIOOOzIOz 
IIOOzlOzz: 
IIOOzlllz 
110010ZZZ 

iioomoz 

IIOIOzzzz ; 
1101100ZZ 
11011010Z 
110110110 



13'b010111011z111 
13*b01011101110zz 
13'b010111011110z 
13'b0101110111110 
13'b01011110zzzzz : 
13'b0101111100zzz: 
13'b01011111010zz 

13'b01011111z11zz 
13'b0101111110zzz 
13'b01011111110zz 
13'b01100000zzzzz : 
13'b011000010000z 



; data_tmp1 = 
data_tmp1 = 
data_tmp1 = 
; data_tmp1 = 
: data_tmp1 = 
data_tmp1 = 
: data_tmp1 = 
: data_tmp1 = 

: data_tnnp1 • 
: data_tmp1 = 
: data_tmp1 = 
: data_tmp1 = 
: data_tmp1 s 
: data_tmp1 • 
: data_tmp1 = 
: data_tmp1 = 
: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 = 
: data_tmp1 
: data_tmp1 



10'bO1 11000101; 

10'bO1 11000101; 

10'bO1 11000101; 

10'bO1 11000101; 
= 10'bO1 11000101; 

10'bO1 11000101; 
= 10'bO1 11000101; 
= 10'bO1 11000101; 

: 10'bO1 110001 10; 
: 10'bO1 110001 10; 
: 10'bO1 110001 10; 
: 10'bO1 110001 10; 
: 10'bO1 110001 10; 
= 10'bO1 110001 10; 
: 10'bO1 110001 10; 
= 10'bO1 110001 10; 
= 10'bO1 11000110; 
= 10'bO1 11000110; 

= 10'bO1 11000111; 
= 10'bO1 110001 11; 
= 10'bO1 110001 11; 
= 10'b0111000111; 
: 10'b0111000111; 
= 10'bO1 11000111; 
= 10'bO1 11000111; 



13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 



lOOOOIOOzIz 
1 00001 OzIOz 
lOOOOIzlOzz 
lOOOOIzlHz 
100001 lOzzz 
100001 1110Z 
lOOOIOOzzzz 
10001010ZZZ 
10001011000 



data_tmp1 = 
data_tmp1 = 

; data_tmp1 = 
data_tmp1 = 

: data_tmp1 = 

: data_tmp1 = 
: data_tmp1 = 
: data_tmp1 = 
: data_tmp1 = 
: data_tmp1 = 
: data_tmp1 = 
: data_tmp1 = 
: data_tmp1 = 
: data_tmp1 = 



13'b01 
13'b01 
13*b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 



1000101 10z1 
lOOOIOIIzIO 
lOOOIzllIOz 
10001Z11111 

10001107777 : 

10001 IIOzzz 
10001 niOzz 
10001111110 



data 
: data' 

data 
: data. 

data, 

data' 
: data 
: data 



tmpi 
!tmp1 
]tmp1 ■ 
]tmp1 
tmp1 = 
tmpi • 
Jmp1 
_tmp1 



10'bO1 11001000; 
10'bO1 11001000; 
10'bO1 11001000; 
10'bO1 11001000; 
10'bO1 11001000; 

10'bO1 11001001; 

10'bO1 11001001; 

10'bO1 11001001; 

10'bO1 11001001; 

10'bO1 11001001; 
: 10'bO1 11001001; 

10'bO1 11001001; 

10'bO1 11001001; 
= lO'bOmOOIOOl; 

: 1O'b0111OO1O1O; 
: 1O'b0111001O1O; 
: 10'b0111001010; 
= 10'bO1 11001 010; 
= 10*b01 11001010; 
= 10'bO1 11001010; 
= 10'b0111001010; 
= 10'bO1 11001010; 
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13'bO11001O002zz2 : data_tmp1 = 10'bO111O01O10- 
13'b01 10010010000 idata^tmpl = 10'bO1 11001010; 

13'b01100100100z1 :data_tmp1 = 10'bO1 11001011 
5 13'b01 10010010210 : data_tmp1 = 10'bO1 11001011 
13'b011001001z10z : data_tmp1 = lO'bOl 11001011 
13'b011001001z111 :data_tmp1 = 10'bO1 11001011 
13'b0110010z110zz : data_tmp1 = 10'bO1 11001 Oil 
13'b0110010z11110 : data_tmp1 = lO'bOl 1100101 1 

10 13'b011001010zzz2 : data_tmp1 = 10'bO1 11001011 
13'b01 100101 lOzzz : data_tmp1 = 10'bOIIIOOIO1 1 
13'b01 100101 1 1 lOz : data_tmp1 = 10'bO1 11001011 
13'b01 100101 11 111 :data_tmp1 = 10'bO1 11001011 
13'b0110011000z2z : data_tmp1 = 10'bO1 11001 Oil 

15 13'b011001100100z : data_tmp1 = 10'bOIIIOOIOII 
13'b01 1001 1001010 :data_tmp1 = 1.0'bO1 11001011 

13'b0110011001z11 :data_tmp1 = 10'bO1 11001 100- 
13'b01100110z110z : data_tmp1 = 1 0'bOI1 10011 Oo' 

20 13'b01100110z1110 : data_tmp1 = 1 0'bOl 11001 lOo' 
13'b0110011z10zzz : data_tmp1 = 10'bOIIIOOIIOo ' 
13'b0110011z1102z : datajmpi = lO'bOl 1 1001 100• 
13'b0110011z11111 :data_tmp1 = 10'bO1 11001 lOo'- 
13'bO11001110z2zz : data_tmp1 = 10'bOIIIOOIIOO ' 

25 13'b01 10011 1 1 lIOz :data_tmp1 = 10'bO1 11001 lOo'- 
13'b0110011111110 : data_tmp1 = 10'bO1 11001 lOo' 
13'b01101000000zz : data_tnnp1 = 10'bO1 11001 lOo ' 
13'b01 10100000100 : data_tmp1 = lO'bOIIIOOl lOo'; 

30 13'b01101000001z1 : data_tmp1 = 10'bO1 11001 101 
13'b011010000z110 : data_tmp1 = 10'bO1 11001 101 
13'b01101000z10zz : data_tmp1 = 10'bO1 11001 101 
13'b01101000z110z : data_tmp1 = 10'bOI1 1001 101 
13'b011010002l111 :data_tmp1 = 10'bO1 11001 101 

35 13'b0110100z102zz : data_tmp1 = 10'bO1 11001 101 
13'b0110100z11110 : data_tmp1 = 10'bO1 11001 101 
13'b011010010z2zz : data_tmp1 = 10'bO1 11001 101 
13'b01 101001 1 lOzz : data_tnnp1 = 10'bO1 11001 101 
13'b01 101001 IIIOz : data_tmp1 = 10'bO1 11001 101 

40 13'b01101001 11111 :data_tmp1 = 10'bO1 11001 101 

13'b01101010zzzz2 : data_tmp1 = 10'bO1 11001 110 
13'b01 10101 lOzzzz : data_tmp1 = 10'bO1 11001 110 
13*b0110101110zz2 : data_tmp1 = 10'bOIIIOO1 110 
45 13'b01 10101 1 1 lOzz : data_tmp1 = 10'bO1 11001 110 

13'b01 10101 lllizz : data_tmp1 = 10'bO1 11001 111- 
13'b011011002zzz2 : data_tmp1 = 10'bO1 11001 111 ' 
13'b011011010zzzz : data_tmp1 = 10'bO1 11001 111' 
50 13'b0110110110zzz : data_tmp1 = 10'bO1 11001 11 1' 
13'b01 101 1011 1000 : data_tmp1 = 10'bO1 11001 111'; 

13'b01101101110z1 :data_tmp1 = 10'bO1 11010000 
13'b0110110111z10 : data_tmp1 = 10'bO1 11010000 
55 13'b01 101 101 1 1 lOz : data_tmp1 = lO'bOl 11010000 
13'b01101101 11111 : data_tmp1 = 10'bO1 11010000 
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13'b01101110222zz : 

13'b011011110zzz2 

13'b0110111110zzz 

13'b011011111l2zz 
13'b01110000zzzzz : 
13'b011100010zzzz 
13'b011 10001 100ZZ 
13'b011 10001 lOIOz 
13'b0111000110110 
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clata_tmp1 = 10'bO1 1 1010000 
data_tmp1 = 10'b0111010000 
datajmpi = 10'bO1 11010000 



: data_tmp1 
data_tmp1 = 
data_tmp1 : 
: data_tmp1 
: data_tmp1 
: data_tmp1 



13'b011100011z111 
13'b01110001110zz : 
13'b011 10001 1110Z 
13'b0111000111110 
13'b01110010zzzzz : 
13'b01 11001 lOzzzz : 
13'b0111001110zzz : 

13'b0111001111zzz : 
13'b01110100zzzzz : 
13'b011101010zzzz : 
13'b0111010110zzz : 
13'b011101011100z 



data, 
data^ 
data 
: data 
data, 
data' 
data' 



tmpi 
tmpi 
tmpi 
i_tmp1 
tmpi : 
tmpi ■ 
]tmp1 



13'b011 
13'b011 
13'b011 
13'b011 
13"b011 
13'b011 
13'b011 



1010111z1z : 
101011110Z 
lOIIOzzzzz : 
lOmOzzzz : 
lOimOzzz : 
10111110ZZ : 
1011111100 



13'b01110111111z1 
13'b0111011111110 
13'b0111100zzzzzz : 
13'b011 1101000000 



data_tmp1 ■ 
data_tmp1 = 
data_tmp1 •■ 
data_tmp1 ■ 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 = 
data_tmp1 = 
data_tmp1 
data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 
data_tmp1 = 
: data_tmp1 



13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 



moioooozi 
moiooozio 
nioioozioz 
moiooziii 
moioziozz 
moioziiio 

mOlzlOzzz : 

11101z1110z 

11101Z11111 

mOIIOzzzz 

111011110ZZ 

11101111110 

imooooozz 

1111000010Z 



: data. 
: data^ 
: data] 
: data' 
dataj 
: data' 
dataj 
: data' 
: data' 
dataj 
: data' 
: data' 
: data 
: data 



_tmp1 
Itmpi 
"tmpi 
Itmpi 
,tmp1 
Jmpi 
tmpi : 
Jmpi 
Jmpi 
Impl : 
_tmp1 
i_tmp1 
_tmp1 
i_tmp1 



13'b011111000z11z 
13'b01111100z10zz 
13'b01111100z110z 



data_tmp1 
data_tmp1 
data_tmp1 



10'bO1 11010001 
10'bO1 11010001 
10'bO1 11010001 
• 10'bO1 1101 0001 
■ 10'bO1 11010001 
= 10'bO1 11010001 



: 10'bO1 11010010; 
■■ 10'bOIIIOIOOIO; 
■ 10'bO1 11010010; 
: 10'bOIIIOIOOIO; 

10'bOI1 1010010; 

10'bOIIIOIOOIO; 

10'bOIIIOIOOIO; 



10'bO1 11010011 
10'bO1 11010011 
10'bO1 11010011 
10'bO1 11010011 
: 10'bO1 1101 0011 



lO'bOmOIOlOO; 
: lO'bOmOIOlOO; 

10'b0111010100; 

lO'bOmOIOlOO; 

lO'bOmOIOlOO; 
■■ lO'bOmOIOlOO; 
: lO'bOmOIOlOO; 

: lO'bOniOIOIOI; 
= lO'bOmOIOIOI; 
lO'bOmOIOIOI; 
: lO'bOinOIOIOI; 

= 10'b0111010110; 
: lO'bOmOIOIIO; 
: 10'bOIIIOIOIIO; 

10'b0111010110; 

10'bOIIIOIOIIO; 
= 10'bOIIIOIOIIO; 

lO'bOmOIOHO; 
■ 10'bOIIIOIOIIO; 
= 10'bOIIIOIOIIO; 

10'bOIIIOIOIIO; 
= 10'bOIIIOIOIIO; 
= 10'bOIIIOIOIIO; 
= id'bOIIIOIOIIO; 
: 10'bOIIIOIOIIO; 



lO'bOIIIOIOIII 

lO'boinoiom 
lO'boiiioiom 
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13'b01111102l0zz2 : data_tmp1 
1 3'b01 1 11 1021 1 1 1z : data_tmp1 
13'b011111010zz22 : data tmp1 
13'b01111101110z2 : data tmp1 
13'b0111110111102: dataltmpi 
13'b011 111 1000222 : data tmpi 
1 3'b01 1 1 1 1 1 001022 : data~tmp1 
13'b011 11 11001 100 : data_tmp1 

13'b01111110011z1 : data tmpi 
13*b011111102l110 : data tmp1 
13'b011111l2l0222: datalmpi ■■ 
13'b011111l2l1022:data tmpi 
13'b011111l2l1102 : data tmpi 
13'b011111l2l1111 : data tmpi 
13'b0111111102222: datalmpi ■■ 
13'b01 11111111110: dataltmpi 
13'b 1000000002222 : data_tmp1 ■ 
13'b 10000000 10022 : data_tmp1 

1 3'b1 0000000 l2l 22 : data_tmp1 ■■ 
13'b 10000002 11022 : data_tmp1 • 
13'b 1000000 102222 : data_tmp1 = 
13'b10000001 10222 : data tmpi : 
1 3'b1 0000001 11 122 : data_tmp1 
13'b1 000001 002222 : data_tmp1 = 
13'b 1000001 01 0222 : data_tmp1 = 
13'b100000101 1022 : data tmpi 
13'b1000001011102 : data~tmp1 

1 3'b1 000001 21 1 1 12 : data_tmp1 • 
13'b 100000 1102222 : data_tmp1 = 
13'b1000001 1 10222 : data tmpi = 
13'b1000001 11 1022 : data tmpi = 
13'b1000001 111102 : data^tmpl 
13'b 10000 10022222 : data_tmp1 = 
13'b1 00001 01 00222 : data_tmp1 = 

13'b 10000 101 21 222 : data_tmp1 = 
13'b10000101 10222 : data_tmp1 = 
13'b 10000 11 022222 : data_tmp1 = 
13'b100001 1 102222 : data tmpi = 
1 3'b1 00001 1 1 1 0022 : data^tmpl = 

13'b10000111l2l22:data tmpi = 
13'b10000111 11022 : datajmpi = 
13'b 1000 100222222 : data tmpi = 
13'b 1000 101 000000 : data tmpi ■■ 
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10'bOI 
10'bOI 
10'bOI 
lO'bOl 
10'bOI 
10'bOI 
10'bOI 
10'bOI 



11010111 
11010111 
11010111 
11010111 
11010111 
11010111 
11010111 
11010111 



= 10'bO1 1101 1000; 
= 10'bO1 11 01 1000; 
= 10'bO1 1101 1000; 
= 10'bO1 1101 1000; 
= 10'bO1 11 01 1000; 
= 10'bO1 1101 1000; 
= 10'bO1 1101 1000; 
= 10'bO1 1101 1000; 
= 10'bO1 1101 1000; 
= 10'bO1 1101 1000; 



10'bOI 
10'bOI 
lO'bOl 
lO'bOl 
lO'bOl 
10'bOI 
10'bOI 
lO'bOl 
■■ 10'bOI 



11011001 
11011001 
11011001 
11011001 
11011001 
11011001 
11011001 
11011001 
11011001 



13'b 10001 
13'b 10001 
13'b 10001 
13'b 10001 
13'b 10001 
13'b 10001 
13'b 10001 



01 00002 1 
OIOOO2IO 
OIOO2IO2 
OIOO2III 
OIO2IO22 
OIO2IIIO 
OI2IO222 : 



: data. 
: data^ 
data^ 
data' 
dataj 
data' 
data' 



_tmp1 
_tmp1 
.tmpi 
_tmp1 
tmp1 
.tmpi 
tmp1 



= lO'bOIIIOIIOlO; 

lO'bOIIIOIIOlO; 

lO'bOIIIOIIOlO; 

lO'bOIIIOIIOlO; 
= lO'bOIIIOIIOlO; 

lO'bOIIIOIIOlO; 

lO'bOIIIOIIOlO; 



lO'bOIIIOIIOII 
10'bO111011O11 
lO'bOIIIOIIOII 
10'bO1 1101 1011 
lO'bOIIIOIIOII 



■ 10'b0111011100; 
= 10'bO11101110O; 
10'bO1 1101 1100; 
- 10'bO111O1110O; 



■■ 10'b0111011101 
■ 10'b0111011101 
10'bOIIIOIIIOI 
10'bO111O111O1 
10'bOIIIOIIIOI 
10*bO111011101 
10'b0111011101 
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13'b10001 
13'b10001 
13'b10001 
13'b10001 
13'b10001 
13'b10001 
13'b10001 
13'b10001 
13'b 10001 

13'b10001 
13'b 10001 
13'b10001 
13'b 10001 
13'b 10001 
13'b 10001 
13'b10001 
13'b 10001 
13'b10001 
13'b 10001 
13'b10001 
13'b10001 



01Z11102 

oiziini 

OHOzzzz : 

oimozz 

01111110 
10000ZZZ 
lOOOIOzz 
1000110Z 
10001110 

lOOzim : 
lOzlOzzz : 
lOzllOzz: 
lOzlHOz: 
10z11110 
10102ZZZ : 
10111111 
IIOOzzzz : 
11010ZZZ : 
110110ZZ : 
1101110Z 
11011110 



: data_tnnp1 
: data_tmp1 
clata_tmp1 = 
: data_tmp1 
: data_tmp1 
: data_tmp1 
; data_tmp1 
: data_tmp1 
: data_tmp1 



13'b1000111z11111 : 
13'b100011110zzzz : 
13'b1000111110zzz : 
13'b10001111110zz : 
13'b100011111110z : 
13'b1000111111110 
13'b10010000zzzzz : 
1 3'b 1001 000 lOzzzz : 

13'b100100z11zzzz : 
13'b 1001 00 lOzzzzz : 
13'b100100110zzzz: 
13'b100101000000z 
13'b1 001 01 0000010 



data 
dataj 
data' 
data' 
data' 
data_ 
data 
data_ 
data' 
data' 
data 
: data 

data, 
dataj 
data~ 
data~ 
: data' 
: data' 
data_ 
data~ 



_tmp1 
tmpl 5 
tmpi = 
tmpl = 
jmp1 
tmpl = 
tmpl 
tmpl = 
tmpl : 
[tmpl 
Itmpi 

.tmpl 
tmpl = 
tmpl • 
[tmpl 
[tmpl 
Jmpl 
tmpl = 
tmpl ■■ 



data_tmp1 = 
data_tmp1 = 
data_tmp1 = 
data_tmp1 
: data_tmp1 



13'b100101 
13'b100101 
13'b100101 
13'b100101 
13'b100101 
13'b100101 
13'b100101 
13'b100101 
13'b100101 
13'b100101 
13'b100101 
13'b100101 
13'b100101 
13'b100101 
13'b100101 



OOOOzH : 
OOOzIOz : 
000Z110 : 
OOzlOzz : 
OOzim : 
OzlOzzz : 
OzllIOz : 

Oziino 

OlOzzzz : 
OmOzz : 
0111111 

1007777 : 

lOIOOzz : 

lOIOIOz 

1010110 



data, 
data] 
data] 
data] 
data] 
data_ 
data' 
data] 
data, 
data] 
data' 
data, 
data] 
data 
: data 



.tmpl 
]tmp1 : 
.tmpl 
tmpl = 
]tmp1 
tmpl = 
]tmp1 
]tmp1 
tmpl : 
]tmp1 
jTipl 
]tmp1 : 
]tmp1 
Jmpi 
rtmpi 



13'b100101101z111 :data_tmp1 
13'b1001011z110z2 : data_tmp1 
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10'bOIIIOIIIOI 
10'b0111011101 
10'b0111011101 

lO'boniomoi 
: lO'boinomoi 

10'bO1 1101 1101 
10'b0111011101 

■ lO'boinomoi 

: 10'bOIIIOIIIOI 

■■ 10'b0111011110 
10'b0111011110 
10'b0111011110 
10'b0111011110 

= 10'bOIIIOIIIIO 
10*b0111011110 

: 10'bOIIIOIIIIO 
10'b0111011110 
10'b0111011110 

■ 10'b0111011110 
: 10'b0111011110 

: lO'bomoiiiio 

= 10'b0111011111 
10'b0111011111 
• 10'b0111011111 
: 10'b0111011111 
: 10'bO1 11011111 
= 10'b0111011111 
10'b0111011111 

■ 10'b0111011111 

10'bO1 11 100000 
10'bO1 11 100000 

■ 10'bO1 11 100000 
= 10'bO1 11 100000 
= 10'bO1 11 100000 

= 10'bO1 11 100001 
= 10'bO1 11 100001 
= 10'bO1 11 100001 
: 10'bO1 11 100001 
= 10'bO1 11 100001 
: 10'bO1 11 100001 
= 10'bO1 11 100001 
= 10'bO1 11 100001 
: 10'bO1 11 100001 
= 10'bO1 11 100001 
= 10'bO1 11 100001 
: 10'bO1 11 100001 
= 10'bO1 11 100001 
= 10'bO1 11 100001 
= 10'bO1 11 100001 



10'bO1 11 100010; 
10'bO1 11 100010; 
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13'b1001011z1110z : data_tmp1 = 10'bO1 11 100010 
13'b1001011z11110 : data_tmp1 = 10'bO1 11100010 
13'b100101110zzzz : data_tmp1 = 10'bO1 1 1100010 
13'b1001011110zz2 : data_tmp1 = 10'bO1 11 100010 
13'b1001011111111 : data_tmp1 = 10'bOIIIIOOOIC 
13'b10011000zz2zz : data_tmp1 = 10'bO1 11 100010 
13'b1 0011 001 OOzzz : data_tmp1 = 10'bO1 11 10001 o' 
1 3'b 1001 1001 01 Ozz : data_tmp1 = 10'bO1 1 1100010 
13'b1001 100101 100 : data_tmp1 = 10'bO1 11 10001 o' 



13'b10011001011z1 :data_tmp1 = 10'bO1 11 100011 
13'b10011001z1110 : data_tmp1 = 10'bO1 11100011 
13'b100110z110zzz : data_tmp1 = 10'bO1 1 110001 1 
13'b100110z1110zz : data_tmp1 = 10'bO1 11 100011 

15 13'b100110z11110z : data_tmp1 = 10'bO1 11 100011 
13'b100110z111lil : data_tmp1 = 10'bO1 11 100011 
13'b10011010zzzzz : data_tmp1 = 10'bO1 1 110001 1 
13'b100110110zzzz : data_tmp1 = 10'bO1 11 100011 
13'b1001101111110 : data_tmp1 = 10'bO1 1 110001 1 

20 13'b10011100000zz : data_tmp1 = 10'bO1 11 10001 1 

13'b100111000z1zz : data_tmp1 = 10'bOIIIIOOIOO 
13'b10011100z10zz : data_tmp1 = 10'bO1 11100100 
13'b1001110z10zzz : data_tmp1 = 10'bO1 11 100100 

25 13'b1001110z111zz : data_tmp1 = 10'bOIIIIOOIOO 
13'b100111010zzz2 : data_tmp1 = 10'bO1 11 100100 
13'b10011101110zz : data_tmp1 = 10'bOIIIIOOlbO 
13'b100111100zzzz : data_tmp1 = 10'bO1 11 100100 
13'b1001111010zz2 : data_tmp1 = 10'bO1 11 100100 

30 13'b10011110110zz : data_tmp1 = 10'bOIIIIOOIOO 
13'b1001111011100 : data_tmp1 = lO'bOl 1 1100100 

13'b10011110111z1 : data_tmp1 = 10'b0111100101 
13'b1001111z11110 : data_tmp1 = 10'bOIIIIOOIOI 

35 13'b100111110zzzz : data_tmp1 = 10'bO1 11 100101 
13'b1001111110zzz : data_tmp1 = 10'bO1 11 100101 
13'b10011111110zz : data_tmp1 = 10'b0111100101 
13'b100111111110z:data_tmp1 = 10'b0111100101 
13'b1001111111lll : data_tmp1 = 10'bOIIIIOOIOI 

40 13'b10100000zzzzz : data_tmp1 = 10'bO1 11 100101 
13'b101000010zzzz: data_tmp1 = 10'b0111100101 
13'b10100001100zz : data_tmp1 = 10'b0111100101 
13'b101000011010z : data_tmp1 = 10'b0111100101 
13'b1010000110110 : data_tmp1 = 10'bO1 11 100101 

45 

13'b101000011z111 :data_tmp1 = 10'bOIIIIOOIIO 
13'b101000z1110zz : data_tmp1 = 10'bO1 111001 10 
13'b101000z11110z : data_tmp1 = 10"b0111100110 
13'b101000z111110 : data_tmp1 = 10'b0111100110 

50 13'b10100010zzzzz : data_tmp1 = 1O'b011110011O 
13'b101000110zzzz : data_tmp1 = 10'b0111100110 
13'b1010001110zzz : data_tmp1 = 10'b0111100110 
13'b1010001111111 :data_tmp1 = 10'bOIIIIOOIld 
13'b101001000zzzz : data_tmp1 = 10'b0111100110' 

55 13'b101001001000z : data_tmp1 = 10'b01111001ld 
13"b1010010010010 : data_tmp1 = 10'b011110011o' 



iSDOClO; <WO 9819410A2J.> 



wo 98/19410 



PCT/US97/189H 



10 



15 



20 



25 



30 



35 



40 



45 



50 



55 



13'b101001 
13'b101001 
13'b101001 
13'b101001 
13*b101001 
13'b101001 
13'b101001 
13'b101001 
13'b101001 
13'b101001 



0010Z11 
OOlzIOz : 
OdzllO 
OzHOzz : 
Oz11111 
zIOzzzz : 
OHOzzz ; 
011110Z 
0111110 
lOzzzzz : 



data, 
data] 
data' 
data] 
data' 
data_ 
data' 
: data' 
: data 
data 



_tmp1 
tmp1 • 
Jmpi 
tmp1 ■■ 
Jmpi 
tmp1 = 
]tmp1 
^tmpl 
i_tmp1 
ttnpl : 
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10'b0111100111 
10'b0111100111 

■■ 10'bO11110O111 
10'bO11110O111 

■ 10'b0111100111 
10'b0111100111 
10'b0111100111 

: 10'b0111100111 
10'b0111100111 
10'b0111100111 



1 3'b1 01001 1 1 1ZZZZ : data_tmp1 = 
13'b1010100zzzzzz : data_tmp1 = 
13'b101010100zzzz : data_tmp1 = 

13'b1010101z1zzzz : data_tmp1 = 
13'b101010110zzzz : data_tmp1 = 
13'b10101100zzzzz : data_tmp1 = 
13'b101011010zzzz : data_tnnp1 = 



13'b101011z11zzzz ; 
13'b10101110zzzzz : 
13'b101011110zzzz : 
13'b101100000zzzz : 
13'b1 Oil 00001 OOOz 
13'b1011000010010 



13'b101 
13*b101 
13'b101 
13'b101 
13'b101 
13"b101 
13'b101 
13'b101 
13'b101 
13'b101 
13'b101 
13'b101 
13'b101 



1 00001 Oz11 
1 00001 zIOz 
100001Z110 
lOOOzllOzz : 

looozimi 

lOOzlOzzzz : 
10001 lOzzz 

loooinioz 

1000111110 

1001077777 : 

loomoozz 

100111010Z 
1001110110 



data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 
: data_tmp1 
: data_tmp1 

: data_tmp1 = 
: data_tmp1 = 
: data_tmp1 = 
: data_tmp1 = 
: data_tmp1 ■ 
data_tmp1 = 
: data_tmp1 = 
: data_tmp1 
: data_tmp1 
; data_tmp1 = 
: data_tmp1 
: data_tmp1 
: data_tmp1 



10'bO1 11 101000; 
10'bO1 11 101000; 
10'bO1 11 101000; 

: 10'bO1 11 101001 
= 10'bO1 11 101001 
= 10'bO1 11 101001 
= 10'bO1 11 101001 

= 10'bOIIIIOIOIO 
= 10'bOIIIIOIOIO 
= 10'bOIIIIOIOIO 
= 10'bOIIIIOIOIO 
= 10'bOIIIIOIOIO 
= 10'bOIIIIOIOIO 

= lO'bOIIIIOIOII 
= lO'bOIIIIOIOII 
• lO'bOIIIIOIOII 
lO'bOIIIIOIOII 
: 10'b0111101011 
lO'bOIIIIOIOII 
lO'bOIIIIOIOII 
: lO'bOIIIIOIOII 
: lO'bOIIIIOIOII 
lO'bOIIIIOIOII 
: lO'bOIIIIOIOII 
= lO'bOIIIIOIOII 
= lO'bOIIIIOIOII 



13'b101 
13'b101 
13'b101 
13'b101 
13'b101 
13'b101 
13'b101 
13'b101 
13'b101 



100111Z111 
1001 mozz 
1001 111 lOz 
1001111110 
1010ZZZZZZ : 
lOIIOOzzzz 
lOIIOIOzzz 
10110110ZZ 
101101110Z 



: data 
: data. 
: data. 
-. data 
data_ 
data, 
: data 
: data 
: data 



tmpl 
tmpi 
tmpi 
Itrnpl 
tmpi = 
]tmp1 ■■ 
]tmp1 
ltmp1 
^tmpl 



13'b1011011z1111z : data_tmp1 
1 3'b1 01 1 01 1 1 0zzzz : data_tmp1 = 
1 3'b 1 0 1 1 01 1 1 1 0zzz : data_tmp 1 
13'b10110111110zz : data_tmp1 
13'b101101111110z : data_tmp1 



: lO'bOimOHOO; 
: 10'bOIIIIOIIOO; 
: 10'bOIIIIOIIOO; 
= 10'b0111101100: 

10'b0111101100; 

lO'bOimOllOO; 
: 10'bOIIIIOIIOO; 
: 10'bOIIIIOIIOO; 
= 10'bOIIIIOIIOO; 

= lO'bOimOIIOI 

= lO'boimoiioi 
: lO'boimoiioi 

= lO'bOIIIIOIIOI 
= lO'bOIIIIOIIOI 
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13'b101 1 100222ZZ2 : clata_tnnp1 = 
13'b10111010000zz: data tmpi 
13'b101110100010z: data tmp1 
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10'b0111101101: 

■■ iO'bOiiiioiioi: 
= iO'boiiiioiioi: 



13'b101110100z11z : data_tmp1 
13'b10111010z10z2 : data tmp1 
13'b10111010z110z : data~tmp1 
13'b101 1 lOlzlOzzz : datalmpi 
13'b1011101z1111z : data_tmp1 
1 3'b 101 1101 lOzzzz : data_tmp1 
13'b101 1 101 1 1 lOzz : data tmp1 
13'b101110111110z: data_tmp1 
13'b10111100zzzzz : data_tmp1 ■■ 
13'b1011110100zzz:data tmpi 
13'b10111101010zz : data~tmp1 
13'b101 11 10101 lOz: data~tmp1 
13'b101 1110101 110 : dataltmpi 

13'b10111101z1111 :data_tmp1 
13'b101111z110zzz : data_tmp1 = 
13'b101111z1110zz : data tmp1 
13'b101111z11110z : data tmpi 
13"b101111z111110 : data_tmp1 
13'b10111110zzzzz : data_tmp1 = 
13'b101 111 1 lOzzzz : data tmp1 = 
13'b101 111 11 11111 : data" tmpi 
13'b110000000zzzz:data_tmp1 = 
13'b1100000010zzz:data_tmp1 = 
1 3'b 11 000000 IIOOz : data_tmp1 
13'b1 10000001 1010 : data_tmp1 

13'b1 10000001 Izll : data tmpi 
13'b1100000z1110z:data_tmp1 = 
13'b1100000z11110 : data_tmp1 
13'b110000z10zzzz : data_tmp1 = 
13'b110000z110zzz : data_tmp1 = 
13'b110000z1110zz : data tmpi = 
1 3'b IIOOOOzl 11111 :data_tmp1 ■ 
1 3'b 1 100001 Ozzzzz : data_tmp1 = 
13'b110000111110z : data tmpi . 
13'b1 100001 1111 10 : data_tmp1 
13'b1100010000zzz:data_tmp1 = 
13'b1 100010001000 : data_tmp1 ■■ 



13'b11000100010z1 
13'b1100010001z10 
13'b11000100z110z 
13'b11000100z1111 
13'b1100010z10zzz 
13'b1100010z110zz 
13'b1100010z11110 
13'b110001z10zzzz 
13"b110001011110z 
13'b1100010111111 
1 3'b 1100011 Ozzzzz : 
13'b1 10001 niOzzz : 



: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 = 
: data_tmp1 
: data_tmp1 
data_tmp1 = 
data_tmp1 



= 10'bOI1 1101 110 
= 10'bOI1 1101 110 
= 10'b0111101110 
= 10'b0111101110 
= 10'bOI1 1101 110 
= 10'b0111101110 
= 10'b0111101110 
= 10'b0111101110 
= 10'b0111101110 
= 10'bOIIIIOIIIO 
= 10'b0111101110 

= lo'boiiiiomo 

= 10'b0111101110 

= 10'b0111101111 
= 10'b0111101111 
= 10'bO1 11101111 
= 10'b0111101111 
= 10'bOI1 1101 111 
= 10'bO1 11 101111 
= 10'bOI1 1101 111 
= 10'b0111101111 
= 10'b0111101111 
= 10'b0111101111 
= 10'b0111101111 
= 10'bOI1 1101 111 

= 10'bOI1 11 10000 
= 10'bOI1 11 10000 
= 10'bOI1 11 10000 
= 10'bO1 11 110000 
= 10'bOI1 11 10000 
= 10'bOI1 11 10000 
= 10'bOI1 11 10000 

= lO'bom 110000 

= 10'bOI1 11 10000 
= 10'bOI1 11 10000 
= 10'bOI1 11 10000 
= 10'bOI1 11 10000 



= 10'b0111110001; 
: 10'bOI1 11 10001; 
= 10*b0111110001: 
= 10'b0111 110001; 

lO'bOin 110001; 

1O'b011111OOO1; 
■■ 10'bOI1 11 10001- 

10'bO1 111 10001; 
: 10'bOI1 11 10001; 
= 10'bOI1 11 10001; 

10'bOIIIIIOOOI; 

10'bOI1 11 10001; 
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13'b1100011111zzz : data_tmp1 = 
13'b1100100zzzzzz : data_tmp1 = 
13'b11001010zz2zz : datajmpl = 
1 3'b11 00101 1 0Ozzz : data_tmp1 = 
5 13'b110010110100z : data_tmp1 ■ 

13'b1 100101 lOlzIz : data_tmp1 = 
13'b1 100101 1z110z : datajmpi = 
13'b1 100101 1 lOzzz : data_tmp1 = 

10 13'b1 100101 1 1 lOzz : data_tmp1 = 
13'b110010111111z : data_tmp1 
13'b1100110z22zzz : data_tnnp1 = 
13'b110011100zzzz : data_tmp1 = 
1 3'b1 1001 11 01 Ozzz : datajmpi = 

15 13'b11001110110zz : data_tmp1 ^ 
13'b1100111011100 : data_tmp1 

13'b1 10011 101 llzl :data_tmp1 
13'b1100111z11110 : data_tmp1 

20 1 3'b1 1 001 1 1 1 0zzzz : data_tmp1 = 
13'b1100111110zzz: datajmpi = 
13'b11001111110zz : datajmpi 
13'b110011111110z : datajmpi 
1 3'b1 1 001 1 1 1 1 1 1 1 1 : datajmpi 

25 1 3'b11 01 OOOzzzzzz : datajmpi = 
13'b110100100zzzz : datajmpi = 
13'b110100101000z : datajmpi 
13'b1101001010010 : datajmpi 

30 13'b1101001010z11 : datajmpi 
13'b110100101z10z : datajmpi 
13'b110100101z110 : datajmpi 
13'b1101001z110zz : datajmpi 
13'b1101001z11 11 1 : datajmpi 

35 13'b1 101001 lOzzzz : datajmpi ■■ 
13'b1 101001 IIOzzz : datajmpi 
13*b110100111110z : datajmpi 
13'b1 101001 111 110 : datajmpi 
13'b1101010zzzzzz : datajmpi = 

40 1 3'b1 101 01 lOOOzzz: datajmpi 
13'b1 101011 001 OOz : datajmpi 

1 3'b1 101 Oil 001 2l z : datajmpi 
13'b1 10101 lOzlIOz : datajmpi 

45 13'b1 10101 IzlOzzz : datajmpi 
13'b1 10101 IzHOzz : datajmpi 
13'b1101011z1111z : datajmpi 
1 3'b1 101 01 IIOzzzz: datajmpi 
1 3'b1 1 01 01 1 1 1 1 1 0z : datajmpi 

50 13'b1101100zzzzzz : datajmpi = 
13'b11011010000zz : datajmpi 

13'b110110100z1zz : datajmpi 
13'b11011010z10zz : datajmpi 
55 13'b1 101 lOlzlOzzz : datajmpi 
13'b1101101z111zz : datajmpi 



10'b0111110010: 
10'b0111110010: 
10'bOIIIIIOOIO; 
10'b0111110010; 
: 10'bOIIIIIOOIO; 



■■ 10'b0111110011 
■■ 10'bOI1 11 10011 
10'bOI1 11 10011 
: 10'bOI1 11 10011 
: 10'bOI1 11 10011 
10'b011 11 10011 
lO'bOH 11 10011 
' 10'b0111110011 
: 10'bOI1 11 10011 
- 10'bO1 11 110011 



: 10'bO1 11 110100; 
: 10'bO1 11 110100; 

10'bOI1 11 10100; 
■■ 10'bOI1 11 10100; 
= 10'bOI1 1110100; 
: 10'b0111110100; 
: 10'b01 11 110100; 

10'b0111 110100; 

10'bOIIIIIOIOO; 
= 10'bO1 11 110100; 
= 10'b0111110100; 

- 10'b0111110101; 
: 10'bOIIIIIOIOI; 
= 10'bOIIIIIOIOI; 
: 10'b0111110101; 
= 10'bOIIIIIOIOI; 
■ 10"b0111110101; 
: 10'b0111110101; 
= 10'bOIIIIIOIOI; 
= 10'b0111110101; 
10*b0111110101; 
: 10'b0111110101; 
= 10'bOIIIIIOIOI; 

= 10'bOIIIIIOIIO; 
= 10'b0111110110; 
: 10*b0111110110; 
: 10'b0111110110; 
= 10'bOIIIIIOIIO; 
: 10'bO11111O11O; 
= lO'bOH 11101 10; 
10'bOI1 11101 10; 
= 10'b0111110110; 

= 10'b0111110111 
= 10*b0111110111 
= 10'b0111110111 
= 10'b0111110111 
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13'b110110110z2Z2: data_tmp1 = 10*b0111110111- 
13'b11011011110z2 : data_tmp1 = 10'bOI 111 1011 1' 
13'b 11 01 110777777 : data_tmp1 = 10'b0111110111;* 

5 13'b1101111zzz2zz : data_tmp1 = 10'bOII 111 1000- 
13'b11100000zzz2z : data_tmp1 = 10'bO1 11111000- 
1 3'b1 1 1 00001 Ozzzz : data_tmp1 = 1 0'bOl 11111 OOo" 
13'b1110000110zzz: data_tmp1 = 10'b011111100o' 
13'b1 1 100001 1 lOzz : data_tmp1 = 10'bO1 111 1 1000' 
10 13'b1 11 00001 1 1 lOz : data_tmp1 = 10'bO1 111 11000; 

13'b111000z11111z: data_tmp1 = 10'bOI 111 11001 • 
13'b11100010zzzzz : data_tmp1 = 10'bO1 11 11 1001 ' 
13'b1 1 10001 lOzzzz : data_tmp1 = 10'bOIIIIIIOOl' 

15 13'b1 1 10001 1 lOzzz : data_tmp1 = 10'bO1 11 11 1001 ' 
13'b1 1 10001 1 1 lOzz : data_tmp1 = 10'b011111100l' 
13'b1 1100011 11 lOz : data_tmp1 = 10'b011111100l' 
13'b11100100zzzzz : data_tmp1 = 10'b011111100l ' 
13'b111001010zzzz : data_tmp1 = 10'b011111l001* 

20 13'b1110010110zzz:data_tmp1 = 10'bO1 1111 lOOl' 
13'b11100101110zz:data_tmp1 = 10'bOIIIIIIOOl' 
13'b111001011110z : data_tmp1 = 10'b011111100l' 
13'b1 110010111 110 : data_tmp1 = 10'bOI 111 11001 ; 

25 13'b111001z111111 : data_tmp1 = 10'b0111111010- 
13'b11100110zzzzz : data_tmp1 = 10'bO1 11 11 1010 ' 
13'b1 11001 11 Ozzzz : data_tmp1 = 10'bO1 1111 1010' 
13'b1110011110zzz : data_tmp1 = 10'bO1 1111 1010' 
13'b11100111110zz : data_tmp1 = 10'bOIIIIIIOIo' 

30 13'b111001111110z:data_tmp1 = 10'bO1 1111 lOlo' 
13'b1110011111110: data_tmp1 = 10'b011111101o' 
13'b1110100zzzzzz : data_tmp1 = 10'bO11111101o ' 
13'b1110101000Q0z: data_tmp1 = 10'b01111110l6; 

35 13'b1110101000z1z : data_tmp1 = 10'bO1 1111 1011- 
13'b111010100z10z : data_tnnp1 = 10'b011111101l ' 
13'b11101010z10zz : data_tmp1 = lO'bOIIIIIIOIl " 
13'b11101010z111z : data_tmp1 = 10'bO1 1111 101 1" 
13'b1110101z10zzz : data_tmp1 = 10'b011111101l ' 

40 .13'b1110101z1110z:data_tmp1 = 10'b011111101l"- 
13'b11 10101 lOzzzz : data_tmp1 = 10*b011111101l ' 
13'b11101011110zz:data_tmp1 = 10'bO1 1111 1011*- 
13'b111010111111z : data_tmp1 = 10'bO1 11111011- 
13'b1110110zzzzzz : data_tmp1 = 10'bO111111011-' 

45 13'b11101110000zz : data_tmp1 = lO'bOIIIIIIOIl'- 
13'b111011100010z : data_tmp1 = lO'bOIIIIIIOIl' 
13'b1 1101 110001 10 : data_tmp1 = lO'bOIIIIIIOIl; 

13'b111011100z111 : data_tmp1 = 10'bO1 1111 1100- 
50 13'b11101110z10zz:data_tmp1 = 10'bO1 11111 100-' 
13'b11101110z110z : data_tmp1 = 10'b0111111100- 
13'b11101110zi110 : datajmpi = 10'bOIIIIIIIOo' 
13'b1110111z10zzz : data_tmp1 = 10'b0111111l00-' 
13'b1110111z11111 :data_tmp1 = 10'b011111llod- 
55 13'b1110111l0zzzz : data_tmp1 = 10'bO1 11111 100-' 
13'b11101111ll0zz : data_tmp1 = 10'bO1 1 111 llOO'- 
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13'b111011111110z 
13'b1110111111110 

13'b1 111000777777 : 

13'b1111001000zzz : 
13'b11110010010z2 
13'b111100100110z 

13'b111100102l11z : 
13'b1111001z10zzz : 
13'b1111001z110zz : 
13'b1111001z1110z : 
13'b111100110zzzz : 
13'b111100111111z ; 

13'b1 11 101 077777Z : 

13'b111101100zzzz : 
13'b1111011010zzz : 

13'b1111011z11zzz : 
13'b111101110zzzz : 
13'b1111011110zzz : 
13'b1111100zzzz2Z : 
13'b11 11101 Ozzzzz : 
13'b111110110G0zz 

13'b111110110z1zz 
13'b11111011z10z2 
13'b11111z1110zzz 
13'b11111z11111zz 
13'b1111110zzzzzz 
13'b11111110zzzzz : 
13'b111111110zzzz 
13'b11111111110z2 
default: data_tmp1 = 
endcase 



: data_tmp1 
: data_tmp1 
data_tmp1 = 
: data_tmp1 
: data_tmp1 
: data_tmp1 



data 
data^ 
data 
data 
data, 
data' 
data, 
data' 
data 



tmpi 
tmpi • 
tmpi 
tmp1 
tmpi 
i_tmp1 
tmpi : 
^tmpl 
"tmpi 
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= 10*b0111111100; 

10'b0111111100; 
10'bOIII1 11100; 

10'b0111111100; 
: 10'bO1 111 11100; 
= 10'b0111111100; 



■■ 10'b0111111101 
10'b0111111101 
10'b0111111101 
10'bO1 11 111101 
10'b0111lil101 

: 10'b0111111101 
10'b0111111101 
10'b0111111101 

■■ lO'bom 111101 



data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 
: data_tmp1 



= 10'b0111111110; 
= 10'b0111111110; 
= 10'b0111111110; 
= 10'bO1 111 11110; 
= 10'b0111111110; 
= 10'b0111111110; 



: data_tmp1 = 1 0'bOl 11111111 
: data_tmp1 = 1 0'bOl 11111111 
: data_tmp1 = 1 0'bOl 11111111 
: data_tmp1 = 1 0'bOl 11111111 
data_tmp1 = 1 0'bOl 11111111 
: data_tmp1 = 1 0'bOl 11111111 
: data_tmp1 = 1 0'bOl 11111111 
: data_tmp1 = 1 0'bOl 11111111 
1 0'bxxxxxxxxxx; 



always @(posedge elk) 
If (enable_3) 

data_tmp2 <= data_tmp1; 
assign out_data = data_tmp2; 
endmodule 



// Sccsid: %W% %G% 



Listing 14 



Copyright (c) 1997 Pioneer Digital Design Centre Limited 
Author : Dawood Alam. 

Description: Verilog code for windowing algorithm to enable detection of the 
"active interval" of the COFDM symbol for guard values of: 
64, 128, 256. 512 and an active interval of 2048. (RTL) 

Notes : This module generates the window signal for the FFT in the form 
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of valid Jn and provides the necessary signals for the l/Q 
demodulator, sync interpolator and error handler. 

To DO: Check between successive symbol acquires for consistency 
in timing. 

Window timing pulse 

tracking mode, filter peaks 

IQ and sync interpolator guard pulses. 

Override functions for timing. 

Gain confidence by comparing symbol_acq vs retrys 



V 



'timescale Ins / lOOps 

module fft_window (in_xr, 
in_xi, 
elk. 
nrst, 
validjn, 
valid_out, 
in_resync, 
outjqgi, 
out_sincgi, 
out_rx_guard, 
out_acquired, 
out_fft_window, 
enable_3_4, 
out_test. 

track_ram_address. 
xri_tmp1, 
xri_tmp5, 
track_ram_rnotw. 
track_ram_enable. 
ram_addr, 
ram^enable, 
ram_rnotw, 
ramlOJn, 

ram logout 
x1r_10, 
x1i_10. 
z2r_10, 
z2i_10. 
fft_ram_rnotw, 
fft_ram_enable, 
fft_ram_addr); 



//To FFT datapath (I). 
//To FFT datapath (Q). 
// From FFT datapath (I) 
// From FFT datapath (Q) 
// From FFT addr gen. 

// From FFT addr gen. 
// From FFT addr gen. 



// 
// 
// 



Parameter definitions. 



55 



parameter wordlength = 12; // Data wordlength. 

parameter r_wordlength = 10; // ROM data wordlength. 

parameter AddressSize =13; // Size of address bus 

parameter FIFO_L = 256; // Tracking FIFO length, 

parameter FIFO_L_bits = 8; // Track FIFO addr bits 
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parameter FIFO^N = 64; // Acc length S(i-j). 

parameter FIFO_n = 64; // Acc length S(i-n-j). 

parameter FIFO^A = 32; // t_offset dly FIFO+1 . 

parameter FIFO_A_bits = 5; // Track FIFO bits. 

5 parameter lu_AddressSize =15; // log lu address size, 

parameter delta = 20; // Gu threshold distance 

parameter acquired_symbols = 2; // Acq symbis before trk 

parameter pos_threshold = 3; // For info only, 

parameter t_offset_threshold = 10; // t_offset valid thresh 

10 parameter w_advance =10; // win trig frm boundary 

parameter sincintjatency = 2; // Latency to sine intep 

parameter iqdemodjatency = 168; // Latency to IQ demod. 

parameter start = 3'bOOO. // Search for neg peak. 

15 peaki = 3'b001, // 1st pos peak found. 

peak2 = 3'b010. // 2nd pos peak found. 

peak3 = 3*b01 1 , // 3rd pos peak found, 

trackl =3'b100, // Tracking model. 

track2 =3'b101; // Tracking model. 

20 



45 



// 

// Input/Output ports. 
// 



25 input elk, // Master clock. 

nrst, // Power-up reset. 

valid Jn, // Input data valid. 

in_resync, // Sync FSM into Acqure. 

fft_ram_rnotw, 
30 fft_ram_enable; 

input [AddressSize-1:0] fft_ram_addr; 

input [wordlength-3:0] in_xr. // FFT input data. I. 
35 in_xi. // FFT input data, Q. 

xri_tmp5; // Track RAM output. 

input [wordlength*2-1 :0] rami O_out; // From 1 K x 24 bit RAM. 

40 input [wordlength-1:0] z2r_10, z2i_10; // From FFT datapath. 

output [wordlength*2-1 :0] ramlOJn; // To 1 K x 24 bit RAM. 

output [wordlength-3:0] xri_tmp1; // Track RAM input. 

output [14:0] out_test; // Temp testpin output. 



output outjqgi. // l/Q demod guard info. 
out_sincgi. // Sine int. guard info. 
50 out^acquired, // Symbol acquired flag. 

out_fft_window. // FFT processor st/stp 
enable_3_4. 
valid_out. 
track_ram_rnotw, 
55 track_ram_enable. 

ram enable. 
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ram_rnotw; 

output (FIFO_L_bits-1 :0] track_ram_address; // Tracking ram address 
output [1:0] out_rx_guard; // Acquired gu length, 
output [AddressSize-1 :0] ram_addr; 

output [wordlength-1 :0] x1 r_1 0. x1 i_1 0; // To FFT datapath. 



// . 

// Wire/register declarations. 
// 



15 reg out_acquired, // Symbol acquired flag. 

out_fft_window, // FFT window signal. 

tracking, // Tracking mode data. 

acc_add, // Acc add only flag. 

acc_add_sub. // Acc add/sub flag. 
20 fifo_a_add_sub, // FIFO_A add/sub flag 

f_ratio_valid. // F ratio is valid 

read . // Track FIFO read flag . 

write. // Track FIFO write flag 

track_mode. // Track/Acq status flag 
25 dpctl_reset, // Datapath control rst. 

t_reset, // Timing counter reset. 

g.a.reset, // Guard_active cnt rst. 

guard_valid, // Guard signal is valid 
t_retime_acq, // Retime timing counter 
30 t_retime_trk. // Retiming for tracking 

t_offset_valid. // Peak offset valid. 

t_offset_avg_valid, // Average offset valid 

pulse. // Pulse on states 4 & 5 

enable_fft, // FFT enabled flag. 
35 out_sincgi, // Guard int to sincint. 

outjqgi, // Guard int to iq demod 

ram_enable, 

ram_rnotw; 

40 reg [14:0] guard_active; // Guard+active length, 
reg [3:0] retry. // No failed retry's. 

acq_symbols; // No of acquired symbis 
reg [wordlength-2:0] xri_tmp7; // Delayed difference 
reg [wordlength-3:0] xr_reg, // (10 bits) 
45 xi_reg, 

xri_tmp1, //Sumof |l| + |Qj. 
xri_tmp3. // Delayed | difference | . 
xri_tmp6; // FIFO 2K/L output. 

50 reg [FIFO_L_bits-1:0] read_address. // Track FIFO read add r 
write_address, // Track FIFO write adr. 
track_ram_address; //Tracking ram address; 

reg (lu_AddressSize-1:0] acc; // Holds input variance. 
55 reg [wordlength-4:0] xr_tmp'1. //Ml 
xi_tmp1; // IQI. 
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reg [2:0] r; // Clock decode counter, 

reg [1-0] out_rx_guard; // Determined guard, 
reg [r_wordlength:0] f_ratio; // Statistical F ratio, 
reg [10:0] fft_valid_count; // Counts no of FFT vids 
5 reg [AddressSize-V.O] window_ram_addr. // ram_address counter. 
ram_addr; 

reg [14:0] t^count, // Window timing count. 

t^offset; // Peak offset from t_ct 
reg [14:0] g_a_count; // Guard_active counter. 
10 reg [14:0] dp_count; // Datapath timing count 
reg [14:0] t_offset_avg; // Averaged offset, 
reg [2:0] state. // Acq/Track FSM state. 

old^state; // Old tracking state, 
reg [9:0] guardjength; // Thresholded guard ten 

15 

reg [FIFO_A_bits:0] fifo_a_count; // Count till fifo_a ful 
// 1 bit more -> retime 

reg [r_wordlength-1 :0] max_peak; // Maximum positive peak 

reg [wordlength-1:0] msb_out_tmp. // Temporary stores for 

[sbjn_tmp; // even symbols to RAM, 
wire [AddressSi2e-1:0] fft_ram_addr; // From FFT RAM addrgen 

25 wire elk, // Master clock. 

nrst, // Power-up reset. 

enable_0_4, // Clock enable 0 in 4. 
enable_1_4. // Clock enable 1 in 4. 
enable_2_4, // Clock enable 2 in 4. 
30 enable_3_4. // Clock enable 3 in 4. 

enable_0_8, // Clock enable 0 in 8. 
enable_1_8, // Clock enable 1 in 8. 
enable_2_8, // Clock enable 2 in 8. 
enable_3_8. // Clock enable 3 in 8. 
35 enable_4_8. // Clock enable 4 in 8. 

enable_5_8, // Clock enable 5 in 8. 
enable_6_8. // Clock enable 6 in 8. 
enable_7_8, // Clock enable 7 in 8. 
ram_enable_8. // Acq FIFO enable. 
40 track_ram_enable. // Tracking RAM enable 

track_ram_rnotw, // Tracking RAM rnotw. 
even_symbol. // valid on even symbols 
in_resync, // Resync to acqn mode. 
pos_peak. // +ve peak, ref only! 
45 dp_control, // Datapath acq/trk ctl. 

t_offset_ctl. // Trk averager dp ctl. 
fft_ram_rnotw, 
fft_ram_enable; 
wire [lu_AddressSi2e-1:0] lu_address; 
50 wire [r_wordlength-1:0] lu_data. 
xri_tmp9; 
wire [wordlength-3:0] xri_tmp2, 
xri_tmp4, 
xri_tmp5, 
55 in_q, 

out_q; 
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wire [wordlength-1 :0] ramjn; 

reg [wordlength-1 :0] lsb_out, 
msb_out; 

reg [wordlength-1 :0] ram_out. 
msbjn, 
Isbjn; 

wire (wordlength*2-1:0] ram10_out; 
reg [wordiength*2-1:0] ramlOJn; 

reg [wordlength-1 :0] x1r_10, x1i_10; 
wire [wordlength-1 :0] z2r_10, 22i_10; 

wire [14:0] out_test: 

wire [14:0] t_offset_diff. // Actual +/- difference 
t_offset_thresh. // Valid offset (maybe) 
t_offset_dly, // Delayed of above. 
t_offset_scalled. // Scalled to t_offset. 
read_pos, // read trig, +ve offset 
read_neg, // read trig, -ve offset 
write_pos, // write trg, +ve offset 
write_neg; // write trg, -ve offset 

assign out test = t offset diff: 
// Z Z z 

// 
// 



Fast 40 MHz clock decoder and validjn control 



always @(posedge elk) 

if (Inrst) // Synchronous power-up reset 

r <= 0; 



else if (validjn) 
r<=r+ rbl; 



// Count if input data valid. 



assign enable_0_4 = valid_in & 
assign enable_1_4 = valid_in & 
assign enable_2_4 = valid_in & 
assign enable_3_4 = validjn & 



assign 
assign 
assign 
assign 
assign 
assign 
assign 



enable_1_8 
enable_2_8 
enable_3_8 
enable_4_8 
enable_5_8 
enable_6_8 
enable 7 8 



valid_in & 
validjn & 
validjn & 
validjn & 
validjn & 
validjn & 
valid in & 



;~r[1] & -.r[0]); // Gate valid_in with 
r^^] & r[0]): // decoded enable signals 

r[1] & ~r(0]); // to control all reg's. 

r[1] & r[0]); // Enables every 4 elk's 

-r[2]&-r(1]&r[0]); 
-r[2]&r(1]&^r[0]); 
~r(2]&r[1]&r[0]): 



r[2 
r[2 

r[2 



& -'r[1] & --r[0]): // Enables every 8 
&~r[1]&r[0]);// elk's 
& r(1] & ~r[0]): 
& r[1] & r[0]); 



50 // 

II 
II 



The en tire data path in corporating the FIFO's, ROM and comparators. 



// Register the data inputs to the windowing module 
always @(posedge elk) 
if (in_resync j ! Inrst) 
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begin 
xr_reg <= in_xr; 
xLreg <= in_xi; 
end 

else if (enable_3_4) 
begin 
xr_reg <= in_xr; 
xi_reg <= in_xi; 
end 

//Take the modulus ofin_xrand in_xi and add together (|in_xr| + |in_xi|). 
always @(xr_reg or xi_reg) 
begin 

if (xr_reg(wordlength-3]) // Checking MSB for negative number. 
15 xr_tmp1 = -xr_reg; 

else 

xr_tmp1 = xr_reg; 

if (xi_reg[wordlength-3]) // Checking MSB for negative number. 
20 xi_tmp1 = -xi_reg; 

else 

xi_tmp1 = xi_reg; 

xri_tmp1 = xrjmpi + xi_tmp1; 
25 end 

assign even_symbol = r[2]: 

always @(even_symbol or msb_out_tmp or ramjn or lsb_out) // Mux MSB/LSB to 
30 if (even_symbol) // allow 1 K RAM 

begin // to act as a 2K 

ram_out = lsb_out; // FIFO, possible 

lsbjn_tmp = ramJn; // since data 

end // bitwidth is 2b 

35 else // bits wide in 

begin // the IK RAM and 

ram_out = msb_out_tmp; // only b bits are 

msbjn = ramJn; // required in the 

end // data path. 

40 

always @(posedge elk) // Delay even 

begin // symbols by one 

if (enable_5_8) // symbol so that 

Isb Jn <= Isb Jn_tmp; // two symbols are 

45 if (enable_7_8) // written & read 

msb_out_tmp <= msb^out; // to the ram. 

end 

assign xri_tmp2 = ram_out; // Map RAM I/O 

50 assign ramJn = xri_tmp1 ; // to dp wires. 

always @(ram10_out or msbJn or Isbjn or z2r_10 or z2i_10 
or ram_enable_8 or enable_3_8 
or fft_ram_enable or fft_ram_rnotw 
55 or window_ram_addr or fft_ram_addr 

or tracking) // FFT/WINDOW FIFO 
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begin // RAM Mux code, 

if (Itracking) // In window acq 

begin // nnode. 

nnsb_out = ram10_out[2*wordlength-1:wordlength]; 
5 lsb_out = rami 0_out[wordlength-1 ;0]; // Connect window 

ram10Jn[2*wordlength.1 :wordlength] = msbjn; // datapath & RAM 
ram10_in[wordlength-1;0] = Isbjn; // control signals 
ram_enable = ram_enable_8; 
ram_rnotw = enable_3_8; 
1 0 ram_addr = window_ranri_addr; 

end 

else // In tracking 

begin // nnode. therefore 

x1r_10 = ram10_out[2*wordlength-1:wordlength]; // FFT functional 
15 x1i_10 = ram10_out[wordlength-1:0]; 

ram10Jn[2*wordlength-1 :wordlength] = 22r_10; // Connect FFT 
ram10Jn[wordlength-1 :0] = z2i_10; // datapath & RAM 
ram^enable = fft_rann_enable; // control signals 

ram^rnotw = fft_ram_rnotw; 
20 ram_addr = fft_ram_addr; 

end 
end 

assign track_ram_rnotw = enable__3_4 & read; 
25 assign track_ram_enable = (enabie_3_4 & read) 1 1 (enable_1_4 & write); 

// Select which FIFO we read data from depending on tracking or acquire mode 
always @(xri_tmp5 or xri_tmp2 or tracking) 
if (tracking) 

30 xri_tmp6 = xri_tmp5; // Tracking mode 

else // data. 

xri Jmp6 = xri Jmp2; // Acquisition 

// mode data. 

// Perform computation of s(i-j) 
35 always @(xri_tmp1 or xri_tmp6) 

xri_tmp7 = xri_tmp1 - xri_tmp6; 

// Take the modulus of xri_tmp7; 
always @(xri_tmp7) 
40 if (xriJmp7(wordlength-2]) // Check MSB for 

xn_tmp3 = -xri_tmp7; // neg number, 

else 

xri_tmp3 = xri_tmp7; 

45 // Setup FIFO to perform moving summation of s(i-j) values 

fft_sr_addr #(wordlength-2, FIFO_N) sr_N (elk. dp_control, // Length=FIFO N. 

xri_tmp3. // Input. " 
xrijmp4); // Output. 

50 // Compute the moving summation i.e S(i-j) = s(i-1,j-1) + s(i-2J-2) + ... 

// We must NOT truncate or round acc as the error will grow across a symbol 
always @(posedge elk) 

if (in_resync i i Inrst 1 1 dpctl_reset) // Clear accumulator at 
acc <= 0; // power-up or Resync or trk. 

55 else if (dp_control & acc^add) // Wait until acc data valid 
// Subtract as well as add when 2K/8K FIFO is full 
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acc <= acc + xrLtmp3 - ((acc_add_sub) ? xrLtmp4 : 0); 

assign lu_address = acc; // Ensure lu_address is large enough to 
// accomodate acc number range. 

5 

fft_windowJu #(r_wordlength. lu_AddressSize) // Case table instance 
log Ju (elk, dp_control. Iu_address, lu_data); // for a log lookup. 

// Setup 5 bit FIFO to detenrnine the delayed variance. 
10 fft_sr_addr #(r_wordlength, FIFO_n) sr_n (elk. dp_control. // Length=FIFO_n. 

lu_data. // Input. 
xri_tmp9); // Output. 

// Determine difference of logs and hence the f_ratio when it is valid. 
15 always @(lu_data or xri_tmp9 or f_ratio_valid) 

f_ratio = (f_ratio_valid) ? Iu_data - xri_tmp9 : VbO; 



// Positive threshold (for information only) 
20 // 

assign pos_peak =((f_ratio >= pos^threshold && 
f^ratio < (1 « r_wordlength)) ? Vbl : VbO); 



25 // 



// FFT window datapath control registers. 



always @(posedge elk) 
30 if (in_resync | ! !nrst 1 1 dpctLreset) // Synchronous reset, 
begin 

f_ratio_valid <= 1*bO; // Initalise datapath 

acc^add <= 1'bO; // control registers. 

acc_add_sub <= 1*bO; 
35 end 

else if (enable_3_4 && -read) // Acquisition mode 

begin // Use 2K/8K FIFO, 

if (dp_count == 2047 + FIFO_N + FIFO_n + 1+1) // f.ratio only valid 
f_ratio_valid <= Vbl ; // after sum of FIFO 

40 if (dp_count == 2047) // +acc+ROM latencys 

acc add <= rbl; // Add if acc full, 

if (dplcount == 2047+FIFO_N) // Add/sub when FIFO 
acc_add_sub <= rb1 ; // N is full, 

end 

45 else if (enable_3_4 && read) // Tracking mode 

begin // Use FIFO_L 

if (dp_count == FIFO_L + FlFO_N + FIFO_n + 1 + 1) // f_ratio only valid 
f_ratio_valid <= rbl ; // after sum of FIFO 

if (dp_count == FIFO_L) // +acc+ROM latencys 

50 acc_add <= 1'bl; // Add if acc full. 

if (dp^count == FIFO_L + FIFO_N) // Add/sub when FIFO 
acc_add_sub <= rb1 ; // N is full, 

end 

55 always @(posedge elk) 

if (in_resync I !nrst) // Synchronous reset. 
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fifo_a_add_sub <= 0; 

else if (enable 3_4 && fifo_a_count == FIFO_A) // fifo a is full 
'i'0_a_add_sub <= 1; // so add and sub. 

always @(posedge elk) 

if (in_resync | j Inrst) // Synchronous reset 

t_offset_avg_valid <= 1 "bO; // Average value is 

else If (enable_3_4 && fifo_a_count == FIFO A + 1) // valid one cvcle 
t_offset_avg_valid <= rb1 : // after add_sub sig. ^ 

assign dp_control = enable_3_4 && // Datapath enable 

(~track_mode 1 1 track_mode && read); // in acq/track mode. 

assign t offset_ctl = enable_3_4 && t_offset valid // clock averaaer 
&& pulse && Iread && tracking; // dp control signal. 

// 

// ^"^ ^^"^ acquisition/tracking timing counters. 

always @(posedge elk) 

if (in_resync 1 1 Inrst 1 1 t_reset) // Synchronous power-up reset 

t_count <= 0; // Reset main timing counter 

else If (enable_3_4 && t_retime_acq) // Retime to count from last 

t count <= t count - guard_active; // peak to current time 
else If (enable_3_4 && -track_mode) // Count if not in track mode 

t_count <= t_count + 1'b1 ; 

else if (enable_3_4 && t_retime_trk) // Otheort/ise must be in track 
t_count <=t count - guard_active // so advance timing for acq 

else if^(i'nabreV4)* " " "'"^-^ ^"^ 

begin // wrap round t_count at 

If (t_count == 2047+guard_length) // end of guard+active length 

t_count<=0; // Needed as a reference to " 

®'se // track peak movement in 

t_count <= t_count + 1 'bl ; // capture window 
end 

always @(posedge elk) 

if (in_resync ! | Inrst 1 1 g_a_reset) // Synchronous power-up reset 

g_a count <=0; // Reset guard_active counter, 

else If (enable_3_4 && f_ratio_valid) // g_a count when f ratio vald 

g_a_count <= g_a_count + 1 'bl ; // Guard active timing counter 

always @(posedge elk) // Datapath timing counter 

If (in_resync | i Inrst 1 1 dpctl_reset) // Synchronous reset 
dp_count<=0; // Reset datapath control, 

else If (enable 3_4 && ~track_mode) // Always count in acquire 
dp_count <= dp_count + 1 'bl ; // mode on elk 0 

e^se If (enable 3_4 && track_mode && read) // Count when reading data in 
dp_count <= dp_count + I'bl; //tracking mode. 

always @(posedge elk) 

if (in_resync i ! Inrst) // Synchronous reset 
fifo_a_count <= 0; 

else if (enable_3_4 && t_offset_ctl) // Only clock averager if Trk 
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fifo_a_count <= fifo_a_count + Vb1; // and t_offset is valid. 

always @(posedge elk) // Create pulse on entering 

if (enable_3_4) // track 4 or track 5 to elk 

5 begin // t_offset_ctl once per state 

if ((state == trackl && // transition. We need to 
old_state != trackl) 1 1 // clock the averager only 
(state == track2 && // once on entering state 4 or 
old_state != track2)) // state 5 hence t_offset_ctl 
10 pulse <= 1*b1; // is gated with pulse, 

else 

pulse <= I'bO; 
old_state <= state; 
end 

15 

always @(posedge elk) 
if (in_resync 1 1 Inrst) 

tracking <= rbO; // Read from 2K/8K FIFO first, 

else if (enable_3_4 && track^mode 
20 && dp_count == FIFO_L+1) // Check if FIFO^L full in trk 

tracking <= 1'bl; // then reacJ tracking FIFO_L. 



// 

// FFT window timing and sync acquisition/tracking FSM 
25 II 



30 



35 



40 



45 



50 



55 



always @(posedge elk) 
if (in_resync 1 1 Inrst) 
begin 
state <= start; 
track_mode <= VbO; 
t_reset <= VbO; 
dpctLreset <= VbO; 
g_a_reset <= VbO; 
max_peak <= I'bO; 



// Acquisition mode FSM. 
// Synchronous power-up reset. 



// FSM starts in resync. 

// Start in acquisition mode. 
// Reset main timing counter. 
// dp_ctl out of reset. 
// Reset guard^aetive counter. 
// Reset max peak value, 
retry <= 0; // Reset no of retry*s. 

acq_symbols <= 0; // Reset acquired no symbols. 

// Guard data is valid. 
// Do not retime at resync. 
// Do not retime at resync. 



guard_valid <= VbO; 
t_retime_aeq <= VbO; 
t_retime_trk <= rbO; 
end 

else if (enable_3_4) 
ease (state) 
rSOV start: begin 

g_a_reset <= VbO; // g_a_reset out of rst 
t_reset <= VbO; // t_eount out of reset. 
guard_valid <= VbO; // Guard invalid. 
// MUST ACT ON RETRYS TOO!! 
state <= peak1 ; // Enter peaki state, 
end 

/*S1*/ peaki: begin 

t_reset <= VbO; // t_count out of reset, 
if (g_a_count < 2048+512) // Search for pos peaki 
begin 

if (f_ratio > max_peak && 



BNSDOCID: <WO '?8l9diOA3 I > 



^^^^^l''^*" PCT/US97/189n 

154 

f_ratio < (1 « r_wordlength)) // Is new peak larger'? 
begin - 

max_peak <= f_ratlo; // If so assign max _peak 
t_reset <= 1 ; // Reset tinning counter 
5 end 
end 

else // First block conriplete. 

begin 

t_reset <= 1 "bO; // t_count out of reset 
1 0 g_a_reset <= 1 'b 1 ; // Reset g_a_count. 

max_peak <= I'bO; // Reset max peak value 
state <= peak2: // Next block search. 



15 



end 
end 

/*S2*/ peak2: begin 

g_a_reset <= 1 'bO; // Next block start cnt 



30 



if (g_a_count < 2048+5 1 2) // Search for pos peak2 
begin 

20 if (f_ratio > max _peak && 

f_ratio < (1 « r_wordlength)) // Is new peak larger"? 
begin 

max_peak <= f_ratio; // If so assign max_peak 
guard_active <= t_count; // Assign guard active. 
25 end ~ 

end // Second block complete 

else if(// First, one peak per block situation (large guards) 
(guard_active < (2560+delta)&& //Test for 2048+512 
guard_active > (2560-delta))| | // pt guard length. 

(guard_active < (2304+delta)&& //Test for 2048+256 
guard_active > (2304-delta))| | // pt guard length. 

{guard_active < (2176+delta)&& // Test for 2048+128 
35 guard_active > (2176-delta))| | // pt guard length. 

(guard_active < (21 12+delta)&& // Test for 2048+64 
guard_active > (21 12-delta))| | // pt guard length. 

40 Now two peaks per block situation (small guards) 

(guard_active < (5120+delta)&& //Test 4096+512+512 
guard_active > (5120-delta))| | // pt guard length. 

(guard_active < (4608+delta)&& //Test 4096+256+256 
45 guard_active > (4608-delta))| | // pt guard length. 

(guard_active < (4352+delta)&& //Test 4096+128+128 
guard_active > (4352-delta))| | // pt guard length. 

50 (guard_active < (4224+delta)&& // Test 4096+64+64 

guard_active > (4224-delta))) // pt guard length, 
begin 

state <= peak3: // Next peak search, 
g.a-reset <= 1 'bl ; // Reset g_a_count. 
55 max_peak <= I'bO; // Reset maximum peak. 

guard_valid <= I'bl; 
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t_retime_acq <= 1'b1; 
end 

else // Acquisition failed so 

begin //jump to start and 

5 state <= start; // increment the retry 

retry <= retry + 1 'b1 ; // counter, 
t^reset <= 1 *b1 ; // Reset t_count. 
g_a_reset <= Vb1 ; // Reset g_a_count. 
max_peak <= 1'bO; // Reset maximum peak. 
10 end 
end 

/*S3*/ peak3: begin 

t_retime_acq <= 1'bO; 
15 g_a_reset <= VbO; // Next block start cnt 

if (g_a_count <. 2048+5 12) // Search for pos peak2 
begin 

if (f_ratio > maxjDeak && 

f_ratio < (1 « r_wordlength)) // Is new peak larger? 
20 begin 

max_peak <= f_ratio; // If so assign max_peak 
guard_active <= t_count; //Assign guard_active. 
end 

end // third block complete 

25 else if(// First, one peak per block situation (large guards) 

(guard_active < (2048+guardJength // Peak test 2048 
+delta)&& // + guard length. 
guard_active > (2048+guardJength 
-delta))|| 

30 

// Now two peaks per block situation (small guards) 
(guard.active < (4096+(2*guardJength)// Peak 4096 + 2 

+delta)&& //*guard length. 
guard_active > (4096+(2*guardJength) 
35 -delta))) 
begin 

acq_symbols <= acq_symbols+1'b1;// Another sym acqurd 

g_a_reset <= 1 *b1 ; // Reset g_a_count. 
max_peak <= VbO; // Reset maximum peak. 
40 t_retime_trk <= rb1 ; // Retime t_count to trk 

track_mode <= 1 'b1 ; // Enter track mode. 
dpctl_reset <= 1 'bl ; // Reset datapath count 
state <= trackl ; // Enter trackl state, 
end 

45 else // Acquisition failed so 

begin // jump to start and 

state <= start; // increment the retry 

retry <= retry + 1 'b1 ; // counter. 

t_reset <= 1'b1; // Reset t^count. 
50 g_a_reset <= 1'b1 ; // Reset g_a_count. 

max_peak <= VbO; // Reset maximum peak. 

end 

end 

55 rS4*/ trackl : begin 

t retime trk<=1'bO; //t count out retime. 
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dpctLreset <= 1 'bO; // dp ctl out of reset, 
if (read && f_ratio_valid) // Peak detect on rd&vid 
begin 

if (f_ratio > max_peak && 

f_ratio < (1 « r_wordlength)) // is new peak larger'? 
begin 

max_peak <= f_ratio; // If so assign max_peak 
t_offset <= t_count; // Store peak offset, 
end 

if (read_address == FIFO_L-1) // If at end of FIFO L 
begin // move to next state. ~ 

state <= track2; // (read_Addr <> FIFO_L) 
max_peak <= 1 'bO; // Reset max peak value 
end 

15 end 
else 

state <= track 1 ; // else wait in track 1 . 
end 

20 rS5V track2: begin 

if (read && f_ratio_valid) // Peak detect on rd&vId 
begin 

if (f_ratio > max_peak && 

f_ratio < (1 « r_wordlength)) // Is new peak larger'? 
25 begin 

max_peak <= f_ratio; // If so assign max peak 
t_offset <= t_count; // Store peak offset ~ 
end 

if (read_address == FIFO_L-1) // At end of FIFO L 
30 begin // move to next state. ~ 

state <= trackl ; // (read_Addr <> FIFO_L) 
max_peak <= 1 "bO; // Reset max peak value. 

end 

end 

35 else 

state <= track2; // Wait in this state, 
end 

default: state <= 3'bXXX; 
40 endcase 
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55 



// 

// FFT window output decode logic. 



always @(posedge elk) 

if (in_resync | : Inrst) // Synchronous reset 

outjqgi <= 0; 

else if (enable_3_4 && tracking && 

t_count == 1 5'dO - iqdemodjatency) // iqgi guard start 
outjqgi <= I'bl; 

else if (enable_3_4 && tracking && 

t_count == iqdemodjatency) // iqgi guard stop 
outjqgi <= I'bO; 



always @(posedge elk) 
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if (in_resync 1 1 Inrst) // Synchronous reset. 

out_sincgi <= 0; 

else if (enable_3_4 && tracking && 

t^count == 15'd0 - sincintjatency) // sincgi guard start. 
5 out sincgi <= Vb1; 

elself (enable_3_4 && tracking && //TO COMPLETE LATENCY STUFF 

t__count == sincint_latency) // sincgi guard stop. 
out_sincgi <= 1*bO; 

10 always @(posedge elk) // Count over active 

if (in_resync \ \ Inrst) // interval to generate 

enable_fft <= rbO; // FFT valid pulse, 

else if (enable_3_4 && tracking && 
t_count == guardjength + FIFO_L/2 - w_advance) // FFT start point is 
15 enable_fft <= 1'bl; // in middle of write 

else if (enable_3_4 && tracking && // into FIFO_L + advced. 

fft_valid_count == 2047) // FFT stop after 2048 
enable_fft <= 1'bO; // samples. 

20 always @(posedge elk) 

if (in^resync 1 1 Inrst) // Synchronous reset. 

fft_valid_count <= 0; 

else if (enable_3_4 && tracking && --enable^fft) // Valid count = 0. 
fft_valid_count <= 0; // until fft is enabled, 

25 else if (enable_3_4 && tracking && enable_fft) 

fft valid count <= fft valid count +Vb1; // Count when enabled. 



assign valid_out = enable_fft & validjn; //MUST SYNCHROS VId every 3 elks? 



30 // 



// Synchronous RAM address generators. 
// 

always @(posedge elk) // Acqsition FIFO address gen. 

35 if (Inrst 1 1 in_resync) // Synchronous reset. 

window_ram_addr <= 0; // Address gen for acq mode, 

else if (enable_2_8) 

window_ram_addr <= window_ram_addr + 1'b1 ; 

40 assign ram_enable_8 = enable_2_8 1 1 enable_3_8 1 1 
enable_4_8 1 1 enable_5_8; 

always @(posedge elk) // Tracking FIFO address gen. 

begin 

45 if (Inrst || in_resync) 
begin 

read^address <= 0; // Reset track FIFO read addr. 
write_address <= 0; // Reset track FIFO write addr 
write <= rbO; // Track FIFO, write disabled. 

50 read <= I'bO; // Track FIFO, read disabled, 

end 

else if (enable_3_4) 
begin 

if (track_mode && t_count == 0) // Track FIFO read 
55 read <= Vbl ; // trigger point. 
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if (read) // Read if read' 

begin // flag is set. 

if (read_address == FIFO_L-1) // Stop read at 
begin //end of FIFO. 

5 read_address <= 0; 

read <= 1'bO; // CIr read flag, 

end 
else 

read_address <= read_address + 1 'b1 ; // Inc r address 
10 end 

if (track^mode && t_count == guard Jength+1 ) // Write if the 
write <= 1 "bl ; // read is guard 

// depth into FIFO 

1 5 if (write) 

begin 

if (write_address == FIFO_L-1 ) // Stop write at 
begin //end of FIFO. 

write_address <= 0; 
20 write <= I'bO; 

end 
else 

write_address <= write_address + 1 "bl ; // Inc w address 

end 

25 end 
end 

always @(enable_1_4 or enable_3_4 or read or write or // Assign read and 
read_address or write_address) // write addresses 
30 if (enable_3_4 && read) // onto common 

track_ram_address = read_address; // address bus 
else if (enable_1_4 && write) // for tracking 

track_ram_address = write_address; // tsyncram RAM. 

35 // _ 

// Thresholding function to determine precise guard interval. 



always @(posedge elk) 
40 if (enable_3_4 && guard_valid) 
begin 

// First, one peak per block situation (large guards) 

if (guard_active < (2560+delta)&& // Test for 2048+51 2 

guard_active > (2560-delta)) // pt guard length 
45 begin 

out_rx_guard <= 2'b1 i; 

guardjength <= 512; 
end 

50 if (guard_active < (2304+delta)&& // Test for 2048+256 

guard_active > (2304-delta)) // pt guard length, 
begin 

out_rx_guard <= 2'b10; 
guardjength <= 256; 
55 end 
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if (guard_active < (21 76+delta)&& // Test for 2048+1 28 
guard_active > (2176-delta)) // pt guard length, 
begin 

out_rx_guard <= 2'b01; 
5 guardjength <= 128; 

end 

if (guard_active < (21 1 2+detta)&& // Test for 2048+64 
guard_active > (21 1 2-delta)) // pt guard length. 
10 begin 

out_rx_guard <= 2'bOO; 
guardjength <= 64; 
end 

15 // Now two peaks per block situation (small guards) 

if (guard_active < (5120+delta)&& // Test for 4096+512+512 
guard_active > (5120-deita)) // 512 pt guard length, 
begin 

out_rx_guard <= 2'b11; 
20 guardjength <= 512; 

end 

if (guard_active < (4608+delta)&& // Test for 4096+256+256 
guard_active > (4608-delta)) // 256 pt guard length. 
25 begin 

out_rx_guard <= 2'b10; 
guardjength <= 256; 
end 

30 if (guard_active < (4352+delta)&& // Test for 4096+128+1 28 

guard_active > (4352-delta)) // 128 pt guard length, 
begin 

out_rx_guard <= 2'b01 ; 
guardjength <= 128; 
35 end 

if (guard_active < (4224+delta)&& // Test for 4096+64+64 
guard_active > (4224-delta)) // 64 pt guard length, 
begin 

40 out_rx_guard <= 2'bOO; 

guardjength <= 64; 
end 
end 

45 // 

// Averager for t_offset in tracking mode. 

// 

assign t_offset_diff = t_offset - (2*FIF0_N + FIFO_n); //dly 2 for latency? 

50 

always @(posedge elk) 

if (in_resync 1 1 Inrst) //NEED TO ENABLE THIS!!!!!! 
t offset valid <= 0; 

else if ((t_offset_diff < (1 « 14 + 1) - t_offsetJhreshold && // Neg 
55 t_offset_diff > (1 « 14 - 1)) 1 1 

(t_offset_diff > t_offsetJhreshold && // Pos 
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^t_offset_diff < (1 « 14)) //CORRECT TO DETECT vid = 1 not 0 

t_offset_valid <= 0; 
else 

5 t_offset_valid <= 1; 

assign t_offset_thresh = (t_offset_valid) ? t_offset_diff : 0; 

!L^^^^^fJ^2}9 Pr-^?2r^ moving summation of t offset values. 
1 0 fft_sr_addr #(15. FIFO_A) sr_A (elk. t_offset ctl ~ 

t_offset_thresh, // Input. 
t_offset_dly); // Output. 

// Compute the moving summation i.e t_offset(l-1) + t offset(i-2) + 
15 // We must NOT truncate or round acc as the en-or wiii grow across a symbol 
always @(posedge elk) ^ ' 

if (in_resync 1 1 Inrst) // Clear accumulator at 

t_offset_avg <= 0; // power-up or Resync 

else if (t_offset_ctl) // Wait until t_offset valid 

20 // Subtract as well as add when averager is full 
t_offset_avg <= t_offset_avg + t_offset_thresh 
- ((fifo_a_add_sub) ? t_offset_dly : 0); 

assign t_offset_scalled = 
25 {{(PIPO_A_bits){t_offset_avg[14]}},t_offset_avg[14:FIFO_A_bits]}; 
// 



30 



// ^° determine conditions for advancing/retarding tracking window. 

assign read_pos = t_offset_scalled; // +ve (late) so 

// delay read 

assign read neg = 2047 + guard_length + 1 - // -ve (early) so 
35 (~t_offset_scalled + 1); // advance read 

assign write_pos = guardjength + 1 + // +ve (late) so 
t_offset_scalled; // delay write 

40 // PROBLEMS WHEN offset > guardjength + 1 

// (should not happen as we range check peaks in acq mode) 
assign write_neg = guardjength + 1 - // -ve (early) so 
(~t_offset_scalled + 1); // advance write 

45 endmodule 

Listing 15 

// Sccsid: %W% %G% 

50 y * . . , ^ ^ 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 
Author : Dawood Alam. 

55 Description: Verilog code for a structural netlist coupling the Fast Fourier 
Transform (FFT) processor to the window acquisition hardware. 
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Notes ; 



'timescale Ins / lOOps 

module fftjop (Ldata. 
q_data, 
10 elk, 
nrst. 

in_resync, 

in_2k8k. 

validjn, 

15 ram4Jn, 
ramSJn. 
ramSJn, 
ram7Jn. 
ramSJn, 
20 ram9Jn, 

ramlOJn, 
i_out, 
q_out. 
out_ovf. 

25 enable_0. 

enable_1 . 
enable_2, 
enable_3. 
valid_out. 
30 ram4_out, 
ram5_out. 

ram6_out. 
ram7_out, 
ram8_out. 
35 ram9_out. 

ram10_out. 
ram_addr. 
ram_enable. 
ram_rnotw. 
40 rom3_addr, 
rom4_addr, 
rom3_data, 
rom4_data, 
track_addr, 
45 track_datajn, 
track_data_out, 

track_rnw. 
track_ram_enable, 
out_rx^uard. 
50 outjqgi. 

out_sincgi, 
ouMest); 



// 



55 // Parameter definitions. 
// 
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parameter 
parameter 
parameter 
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parameter 
parameter 
parameter 
parameter 
parameter 
parameter 
parameter 
parameter 
parameter 
parameter 
parameter 
parameter 
parameter 
parameter 
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wordlength = 12; // Data wordlength. 
c_wordlength =10; // Coeff wordlength. 
AddressSize =13; // Size of address bus. 
rom_AddressSize =13; // ROM address bus size 
mult_scale = 3; // Multiplier scailing: 

// 1 = /4096. 2 = /2048. 

//3 = /1 024.4 = 751 2. 

r_word length = 10; // ROM data wordlength. 
FIFO_L = 256; // Tracking FIFO length. 
FIFO_L_bits = 8; // Track FIFO addr bits 
FIFO _N = 64; // Acc length S(i-j). 

// Acc length S(i-n-j). 
// t_offset delay FIFO. 

. // Track FIFO bits. 

lu_AddressSize = 15; // log rom address size, 
delta = 20; // Gu threshold distance 
acquired_symbols = 2; // Acq symbis before trk 
pos_threshold = 3; // for info only. 
t_offset_threshold = 10; // t_offset valid thresh 
w_advance = 10; // win trig frm boundary 
sincintjatency = 2; // Latency to sine intep 
iqdemod_latency = 168; // Latency to 10 demod. 



FIFO_n = 64; 
FIFO_A = 32; 
FIFO_A_bits = 5; 



//-- 
// 

II- 



Input/Output ports. 



30 



35 



40 



45 



50 



55 



input elk. // Master clock. 

nrst, // Power-up reset. 
in_2k8k. // 2K mode active low. 
validjn, // Input data valid. 
in_resync; 

input [9:0] i_data. // FFT input data. I. 
q_data; // FFT input data, Q. 

input [wordlength-3:0] track_data_out; 

input [wordlength*2-1 :0] ram4_out. // Couple the l/Q data 

ram5_out. // outputs from the 

ram6_out, // memory to the 

ram7_out. // respective butterfly 

ram8_out. // processors. 

ram9_out, 

ram10_out; 

input [c_wordlength*2-1 :0] rom3_data, 
rom4_data; 

output [rom_AddressSize-6:0] rom3_addr; 
output [rom_AddressSize-4:0i rom4_addr; 



output [14:0] 
output [1:0] 



out_test; // Temp testpin output. 
out_rx_guard; // Acquired gu length. 
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output [wordlength-3:0] track_datajn; 

output [wordlength*2-1 -.0] ram4Jn, // Couple the l/Q data 
ram5_in, // outputs of each BF 
ramSJn, // processor to their 
ram7Jn, // respective memory 
ramSJn, // inputs. 
ram9Jn, 
ramlOJn; 

output [AddressSize-1:0] ram_addr; // RAM address bus. 



output out_ovf. // Overflow flag. 
enable_0, // Enable clock 0. 
15 enable_1, // Enable clock 1 . 

enable_2, // Enable clock 2. 
enable_3. // Enable clock 3. 
valid_out. // Output data valid. 
ram_enable, // RAM enable. 
20 ram_motw, 
track_rnw, 
track_ram_enable, 

outjqgi. 
out_sincgi; 

25 

output [FIFO_L_bits-1:0] track_addr; 

output [wordlength-1 :01 i_out. // FFT output data. I. 
q_out; // FFT output data. Q. 

// 

// Wire/register declarations. 

// r 

35 wire [9:0] i data. // FFTA/VIN input I. 

q_dataT // FFT/WIN output Q. 



wire [wordlength-1 :01 i_out. // FFT output data. I. 
q_out; // FFT output data, Q. 



wire [wordlength*2-1:0] ram4Jn, 
ram5Jn, 
ram6Jn. 
ram7Jn. 
45 ramSJn. 

ram9_in, 
ramlOJn; 

wire [wordlength*2-1 :0] ram4_out. 
50 ram5_out. 

ram6_out. 
ram7_out, 
ram8_out, 
ram9_out. 
55 ram10_out; 
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wire [AddressSize-1:0] ram_addr, // RAM address bus 
ra m_ad d r_fft_2_wi n ; 

wire elk. 
5 nrst, 

in_2k8k. 
in_resync, 
valid Jn, 
out_ovf, 
10 enable_0. 

enable_1 , 
enable_2, 
enable_3. 
valid_out, 

15 ram_enable, // RAM enable signal. 

ram_rnotw. 
valid_win_2_fft. 
ram_rnotw_fft_2_win. 
ram_enable_fft_2_win , 
20 track_rnw, 

track_ram_enable. 

outjqgi, 
out_sincgi; 

25 wire [wordlength-1:0] x1r_10, x1i 10 
z2r_10, z2i_10; 

wire [wordlength-3:0] track_datajn, 
track data out; 
30 ~ ~ 

wire [FIFO_L_bits-1:0] track_addr; 

wire [1:0] out_rx_guard; // Determined guard. 

35 wire (c_wordlength''2-1:0] rom3_data. 
rom4_data; 

wire [rom_AddressSize-6:0] rom3_addr 
wire [rom_AddressSize-4:0i ronn4_addr; 

40 

wire [14:0] outjest; 

// ^ 

// Instance FFT processor. 
45 // !-__ 



m_r22sdf #(wordlength. 
c_wordlength, 
AddressSIze, 
50 ronn_AddressSize, 
mult_scale) 
m (.in_xr(i_data), // FFT input data, I. 
.in_xi(q_data). // FFT input data, Q 
.clk(clk), // Master clock. 
55 .nrst(nrst), // Power-up reset 

.in_2k8k(in_2k8k), // 2K active low. 
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.valid Jn(valid_win_2_fft),// Input valid. 
out_xr(i__out), // FFT output data, I. 
.out_xi(q_out), // FFT output data, Q. 

.out_ovf(out_ovf). // Overflow flag. 
enable_0(enable_0). 
.enabie_1 (enable_1 ). 
.enable_2(enable_2), 
.enable_3(ram_rnotw__fft_2_win), 

.valid_out(valid_out), 
. ram_address(ram_add r_fft_2_win) . 
.ram_enable(ram_enable_fft_2_win), 
.address_rom3(rom3_addr), 
.address_rom4(rom4_addr), 

// RAM input ports. 

.z2r_4(ram4Jn[wordlength-1 :0]), 
.z2i_4(rann4Jn[wordlength*2-1:wordlength]). 

.22r_5(ram5Jn[wordlength-1 :0]), 
.22i_5(ram5Jn[wordlength*2-1:wordlength]), 

.22r_6(ram6Jn[wordlength-1 :0]), 
.z2i_6(rann6Jn[wordlength*2-1 rwordiength]), 

.z2r__7(rann7Jn[wordlength-1:0]), 
.z2i_7(rann7Jn[wordlength*2-1:wordlength]), 

.z2r_8(ram8 Jn[wordlength-1 :0]). 
.22i_8(ram8Jn[wordlength*2-1:wordlength]). 

.22r_9(ram9 Jn[wordlength-1 :0]), 
.z2i_9(rann9Jn[wordlength*2-1:wordlength]). 

.z2r_10(z2r_10)y/ Frm FFT datapath to window (I). 
.z2i_10(22i_10)y/ Fmn FFT datapath to window (Q). 

// RAM output ports. 

.x1 r_4(ram4_out[wordlength-1 :0]). 
.x1 i_4(ram4_out[wordlength*2-1 :wordlength]). 

.x1 r_5(ram5_out[wordlength-1 :0]), 
.x1i_5(ram5_out[wordlength*2-1 iwordlength]), 

.x1 r_6(ram6_out[wordlength-1 :0]), 
.x1 i_6(ram6_out[wordiength*2-1 iwordlength]), 

.x1 r_7(ram7_out(wordlength-1 :0]), 
.x1 i_7(ram7_out[wordlength*2-1 :wordlength]). 

,x1 r_8(ram8_out[wordlength-1 :0]). 
.x1 i_8(ram8_out[wordlength*2-1 :wordlength]). 

.x1 r_9(ram9_out[wordlength-1 :0]), 
.x1 i_9(ram9_out[wordlength*2-1 :word length]). 

.x1 r_10(x1 r_10),// To FFT datapath frm window (I). 
.x1i_10(x1i_10)y/To FFT datapath frm window (Q). 

// ROM output ports. 

.br_3(rom3_data[c_wordlength*2-1:c_wordlength]), 
.bi_3{rom3_data[c_wordlength-1:0]). 
.br_4(rom4_data[c_wordlength*2-1:c_wordlength]). 
.bi_4(rom4_data[c_wordlength-1:0])); 



Instance FFT window processor. 
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fft_window #(wordlength, 
reword length, 

AddressSize, 
FIFO.L. 
FIFO_L bits, 

fifo_nT 

FIFO.n, 

FIFO_A, 

FIFO_A_bits. 

lu_AddressSize, 

delta. 

acquired_symbols. 
pos^threshold, 
t_offset_threshold. 
w_advance. 
sincintjatency. 
iqdemodjatency) 
window (.in_xr(i_data). 
•iri„xi(q_data). 
.clk(clk). 
.nrst(nrst). 
.validjn(valid_in). 
.valid_out(valid_win_2_fft), 
.in_resync(in_resync). 
.outjqgi(outjqgi), 
.out_sincgi(out_sincgi). 
.out_rx_guard(out_rx_guard). 
.out_acquired(out_acquired), 
. o u t_fft_wi ndow(o ut_fft_wi nd o w) , 
.enable_3_4(enable_3), 
.out_test(out_test), 
.track_ram_address(track_addr), 
.xri_tmp 1 (track_data Jn). 
.xri_tmp5(track_data_out), 
.track_ram_rnotw(track_mw), 
.track_ram_enable(track_ram_enable). 
.ram_addr(ram_addr). 

.ram_enable(ram_enable), 
. ra m_rn otw( ra m_rn otw) , 
.ram10Jn(rann10Jn), //To 1K x 24 bit RAM. 

,ram10_out(ram10_out). // From 1K x 24 bit RAM. 
.x1rJ0(x1r_10). //To FFT datapath (I). 
.x1iJ0(x1i_10), //To FFT datapath (Q). 
.z2r_10(z2r_10). // From FFT datapath (I) 
.z2i_1 0(z2i_1 0), // From FFT datapath (Q) 
.fft_ram_rnotw(ram_rnotw_fft_2_win), 
.fft_ram_enable(ram_enable_fft_2_win). 
.fft_ram_addr(ram_addr_fft_2_win)); 

endmodule 



Listing 16 

// 2048 point FFT twiddle factor coefficients (Radix 4+2). 

// Coefficients stored as non-fractional 10 bit integers (scale 1 ). 

// Real Coefficient (cosine value) is coefficient high-byte. 

// Imaginary Coefficient (sine value) is coefficient low-byte. 
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0111111111 
0111111111. 
0111111111 
0111111111 
5 0111111111 
0111111111 
0111111111 
0111111111 
0111111111 

10 0111111111 
0111111111' 
0111111111" 
0111111111 
0111111111 

15 0111111111 
0111111111 
0111111111 
0111111111 
0111111111 

20 0111111111 
0111111111" 
0111111111 
0111111111" 
0111111111" 

25 0111111111 
0111111110" 
0111111110" 
0111111110" 
0111111110" 

30 0111111110" 
0111111110" 
0111111110" 
0111111110" 
0111111101" 

35 0111111101" 
0111111101" 
0111111101" 
0111111101" 
0111111101' 

40 0111111100" 
0111111100" 
0111111100" 
0111111100" 
0111111100" 

45 0111111011" 
0111111011" 
0111111011" 
0111111011" 
0111111010 

50 0111111010 
0111111010 
0111111010 
0111111001 
0111111001 

55 0111111001 
0111111001 



0000000000 
1111111110 
"1111111101 
"1111111011 
"1111111010 
"1111111000 
"1111110111 
"1111110101 
"1111110011 
"1111110010 
'1111110000 
'1111101111 
'1111101101 
'1111101100 
'1111101010 
'1111101000 
'1111100111 
'1111100101 
"1111100100 
"1111100010 
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-0.534998 
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-0.545325 
-0.547894 
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-0.553017 
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-0.565732 
-0.568259 
-0.570781 
-0.573297 
-0.575808 
-0.578314 
-0.580814 
-0.583309 
-0.585798 
-0.588282 
-0.590760 
-0.593232 
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-0.603067 
-0.605511 
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0110001011^1010111010 
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0110000111_1010110101 
0110000110_1010110100 
0110000101_1010110011 
01 10000100_10101 10010 

10 01 1000001 1_10101 10000 
0110000010_1010101111 
0110000001_1010101110 
0110000000_1010101101 
0101111111_1010101100 

15 0101111101_1010101010 
0101111100_1010101001 
0101111011_1010101000 
0101111010_1010100111 
0101111001_1010100110 

20 0101111000_1010100101 
0101110111_1010100100 
0101110110_1010100010 
0101110101_1010100001 
0101110100_1010100000 

25 0101110011_1010011111 
0101110010_1010011110 
0101110001_1010011101 
0101 110000_101001 1100 
0101101110_1010011010 

30 0101101101_1010011001 
0101 101 100_101001 1000 
0101101011_1010010111 
0101101010_1010010110 
0101101001_1010010101 

35 0101101000_1010010100 
0101100111_1010010011 
0101 1001 10_1010010010 
01011 001 00_1 01 001 0000 
0101100011_1010001111 

40 0101 100010_1010001 110 
0101 100001_1010001 101 
01011 00000_1 01 0001 1 00 
0101011111_10i0001011 
0101011110_1010001010 

45 010101 1100_1010001001 
010101 101 1_1010001000 
010101 1010_10100001 11 
0101011001_1010000110 
010101 1000_1010000101 

50 0101010111_1010000100 
01010101 10_1010000011 
0101010100_1010000001 
010101001 1_1010000000 
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55 0101010001_1001111110 
0101010000 1001111101 
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// W0224_2048 = +0.773010 
// \/V0225_2048 = +0.771061 
// W0226_2048 = +0.769103 
// W0227_2048 = +0.767139 
// W0228_2048 = +0.765167 
// W0229_2048 = +0.763188 
// W0230_2048 = +0.761202 
// W0231_2048 = +0.759209 
// W0232_2048 = +0.757209 
// W0233_2048 = +0.755201 
// W0234_2048 = +0.753187 
// W0235_2048 = +0.751 165 
// W0236_2048 = +0.749136 
// W0237_2048 = +0.747101 
// W0238_2048 = +0.745058 
// W0239_2048 = +0.743008 
// W0240_2048 = +0.740951 
// W0241_2048 = +0.738887 
// W0242_2048 = +0.736817 
// W0243_2048 = +0.734739 
// W0244_2048 = +0.732654 
// W0245_2048 = +0.730563 
// W0246_2048 = +0.728464 
// W0247_2048 = +0.726359 
// W0248_2048 = +0.724247 
// W0249_2048 = +0.722128 
// W0250_2048 = +0.720003 
// W0251_2048 = +0.717870 
// W0252_2048 = +0.71 5731 
// W0253_2048 = +0.713585 
// W0254_2048 = +0.71 1432 
// W0255_2048 = +0.709273 
// W0256_2048 = +0.707107 
// W0257_2048 = +0.704934 
// W0258_2048 = +0.702755 
// W0259_2048 = +0.700569 
// W0260_2048 = +0.698376 
// W0261_2048 = +0.696177 
// W0262_2048 = +0.693971 
// W0263_2048 = +0.691759 
// W0264_2048 = +0.689541 
// W0265_2048 = +0.687315 
// W0266_2048 = +0.685084 
// W0267_2048 = +0.682846 
// W0268_2048 = +0.680601 
// W0269_2048 = +0.678350 
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// W0271_2048 = +0.673829 
// W0272_2048 = +0.671559 
// W0273_2048 = +0.669283 
// W0274_2048 = +0.667000 
// W0275_2048 = +0.66471 1 
// W0276_2048 = +0.662416 
// W0277_2048 = +0.6601 14 
// W0278_2048 = +0.657807 
// W0279_2048 = +0.655493 
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01010001 10_1001 110101 
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15 0100111101_1001101110 
0100111100_1001101101 
0100111011_1001101100 
0100111010_1001101011 
01001 11001_1001 101010 

20 0100110111_1001101001 
01001 101 10_1001 101 001 
01 001 10101_1001 101000 
01001 10100_1001 1001 11 
0100110010_1001100110 

25 01001 10001_1001100101 
01001 10000_1 001 100100 
0100101 110_1001 100011 
0100101 101_1001 100010 
0100101 100_1001 100001 
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0100101001_1001011111 
0100101000_1001011110 
01001001 11_100101 1101 
01001001 10_100101 1100 

35 0100100100_1001011100 
010010001 1_100101 101 1 
0100100010_1001011010 
0 1 00 1 00000_1 00 1 0 1 1 00 1 
010001 1 11 1_100101 1000 

40 010001 1110_10010101 11 
010001 1 100_10010101 10 
010001 101 1_1001010101 
010001 1010_1001010101 
010001 1001_1001010100 

45 01000101 11_1001010011 
01000101 10_1001010010 
0100010101_1001010001 
010001001 1_1001010000 
01 0001 001 0_1 001 001 1 1 1 
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// W0280^2048 = +0.653173 
// W0281_2048 = +0.650847 
// W0282_2048 = +0.648514 
// W0283_2048 = +0.646176 
// W0284_2048 = +0.643832 
// W0285_2048 = +0.641481 
// W0286_2048 = +0.639124 
// W0287_2048 = +0.636762 
// W0288_2048 = +0.634393 
// W0289_2048 = +0.632019 
// W0290_2048 = +0.629638 
// W0291_2048 = +0.627252 
// W0292_2048 = +0.624859 
// W0293_2048 = +0.622461 
// W0294_2048 = +0.620057 
// W0295_2048 = +0.617647 
// W0296_2048 = +0.615232 
// W0297_2048 = +0.612810 
// W0298_2048 = +0.610383 
// W0299_2048 = +0.607950 
// W0300_2048 = +0.60551 1 
// W0301_2048 = +0.603067 
// W0302_2048 = +0.600616 
// W0303_2048 = +0.598161 
// W0304_2048 = +0.595699 
// W0305_2048 = +0.593232 
// W0306_2048 = +0.590760 
// W0307_2048 = +0.588282 
// W0308_2048 = +0.585798 
// W0309_2048 = +0.583309 
// W0310_2048 = +0.580814 
// W0311_2048 = +0.578314 
// W0312_2048 = +0.575808 
// W0313_2048 = +0.573297 
// W0314_2048 = +0.570781 
// W0315_2048 = +0.568259 
// W0316_2048 = +0.565732 
// W0317_2048 = +0.563199 
// W0318_2048 = +0.560662 
// W0319_2048 = +0.558119 
// W0320_2048 = +0.555570 
// W0321_2048 = +0.553017 
// W0322_2048 = +0.550458 
// W0323_2048 = +0.547894 
// W0324_2048 = +0.545325 
// W0325_2048 = +0.542751 
// W0326_2048 = +0.540171 
// W0327_2048 = +0.537587 
// W0328_2048 = +0.534998 
// W0329_2048 = +0.532403 
// W0330_2048 = +0.529804 
// W0331_2048 = +0.527199 
// W0332_2048 = +0.524590 
// W0333_2048 = +0.521975 
// W0334_2048 = +0.519356 
// W0335 2048 = +0.516732 
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-0.803208 

-0.805031 
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-0.819348 
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-0.831470 
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001011 1110_1000100101 
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1000001001" 

30 1000001001 
1000001001 
1000001000 
1000001000" 
1000000111' 

35 1000000111' 
1000000111" 
1000000110" 
1000000110" 
1000000110" 

40 1000000101 
1000000101" 
1000000100' 
1000000100' 
1000000100" 

45 1000000011" 
1000000011' 
1000000011' 
1000000011" 
1000000010" 

50 1000000010" 
1000000010 
1000000010 
1000000010 
1000000010 

55 1000000001 
1000000001 



1101011111 
1101100001 
1101100010 
1101100101 
1101101000 
1101101010 
1101101011 
1101101110 
1101110001 
1101110011 
1101110100 
1101110111 
1101111010 
1101111100 
1101111110 
1110000001 
1110000100 
1110000101 
1110000111 
1110001010 
1110001101 
1110001110 
1110010000 
1110010011 
1110010110 
1110010111 
1110011001 
1110011100 
1110011111 
"1110100001 
"1110100010 
"1110100101 
"1110101000 
"1110101010 
"1110101100 
"1110101111 
'1110110010 
"1110110011 
'1110110101 
"1110111000 
'1110111011 
"1110111101 
'1110111110 
"1111000001 
"1111000100 
'1111000110 
"1111001000 
'1111001011 
1111001110 
'1111001111 
'1111010001 
'1111010100 
"1111010111 
'1111011001 
"1111011010 
'1111011101 



// W0920 


2048 




-0.949528 


-0.313682 


//W0921 


"2048 




-0.950486 


-0.310767 


// W0922~ 


'2048 




-0.951435 


-0.307850 


// W0924" 


'2048 




-0.953306 


-0.302006 


// W0926" 


'2048 




-0.955141 


-0.296151 


// W0927" 


'2048 




-0.956045 


-0.293219 


// W0928" 


"2048 


— 


-0.956940 


-0.290285 


// W0930~ 


"2048 




-0.958703 


-0.284408 


// W0932" 


"2048 


- 


-0.960431 


-0.278520 


// W0933" 


'2048 


- 


-0.961280 


-0.275572 


// W0934" 


"2048 


— 


-0.962121 


-0.272621 


// W0936~ 


'2048 


— 


-0.963776 


-0.266713 


// W0938" 


"2048 


— 


-0.965394 


-0.260794 


// W0939' 


"2048 




-0.966190 


-0.257831 


// W0940~ 


'2048 


— 


-0.966976 


-0.254866 


// W0942" 


'2048 


— 


-0.968522 


-0.248928 


// W0944~ 


"2048 


— 


-0.970031 


-0.242980 


// W0945~ 


"2048 


— 


-0.970772 


-0.240003 


// W0946" 


'2048 




-0.971504 


-0 237024 


// W0948" 

§9 w w \^ \^ r 


"2048 




-0 972940 


-0 231058 


// W0950' 


"2048 


_ 


-0.974339 


-0.225084 


// W0951' 


2048 


_ 


-0 975025 


-0 222094 


// W0952' 


"2048 


_ 


-0 975702 


-0.219101 


// W0954' 

9 9 WW %^ r 


"2048 


— 


-0 977028 


-0 213110 


// W0956"" 

9 9 WW \^ \^ \^ 


"2048 


— 


-0.978317 


-0.207111 


II W0957' 

9 9 WW %^ \^ 1 


"2048 




-0 978948 


-0.204109 


// W0958" 


'2048 





-0 979570 


-0 201105 


// W0960' 

ft w •V^WV^V 


"2048 




-0 980785 


-0 195090 


// W0962" 


'2048 


_ 


-0 981964 


-0 189069 


// W0963' 

§9 WW \^ \^ \^ \^ 


'2048 





-0 982539 


-0.186055 


II W0964' 

9 9 WW \^ %^ X^^T 


'2048 




-0 983105 


-0.183040 


// W0966" 


"2048 




-0 984210 


-0.177004 


II W0968' 


"2048 




-0 985278 


-0.170962 


// W0969" 


'2048 


— 


-0.985798 


-0.167938 


// W0970" 


"2048 


— 


-0.986308 


-0.164913 


// W0972' 


"2048 


— 


-0.987301 


-0.158858 


// W0974" 


"2048 


— 


-0.988258 


-0.152797 


// W0975' 


"2048 


— 


-0.988722 


-0.149765 


// W0976" 


"2048 


— 


-0.989177 


-0.146730 


// W0978' 


"2048 


— 


-0.990058 


-0.140658 


// W0980' 


"2048 


— 


-0.990903 


-0.134581 


// W0981" 


"2048 


- 


-0.991311 


-0.131540 


// W0982' 


"2048 


- 


-0.991710 


-0.128498 


// W0984' 


"2048 


— 


-0.992480 


-0.122411 


// W0986' 


"2048 


— 


-0.993212 


-0.116319 


// W0987' 


"2048 


— 


-0.993564 


-0.113271 


// W0988' 


"2048 


— 


-0.993907 


-0.110222 


// W0990" 


"2048 


— 


-0.994565 


-0.104122 


// W0992" 


"2048 


— 


-0.995185 


-0.098017 


// W0993" 


"2048 




-0.995481 


-0.094963 


//W0994" 


■"2048 




-0.995767 


-0.091909 


//W0996" 


2048 




-0.996313 


-0.085797 


// W0998' 


2048 




-0.996820 


-0.079682 


// W0999' 


2048 




-0.997060 


-0.076624 


//W1000" 


2048 




-0.997290 


-0.073565 


//W1002 


2048 




-0.997723 


-0.067444 
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1000000001_1 1 1 1 100001 
1 00000000 1_1 1 1 1 100010 
1 00000000 1 _1 1 1 1 1 00 1 00 
1000000001_1111 100111 
5 1000000000_11 11 101010 
1 000000000_1 1 1 1 1 01 1 00 
1 000000000_1 111101101 
1 000000000_1 11111 0000 
1 000000000_1 1 1 1 1 1001 1 

10 1000000000_1111 110101 
1000000000_1111 110111 
1000000000_11 11 111010 
1000000000_1 111 111101 
1 000000000_1 111111110 

15 1000000000_0000000011 
1 000000000_0000001 000 
1 000000000_0000001 1 01 
1000000000_0000010001 
1000000000_00000101 10 

20 1 00000000 1_000001 1011 
1 000000001_000001 1111 
1 00000000 1_0000 100 100 
1 00000001 0_00001 01 001 
1000000010_0000101101 

25 1 00000001 0_0000 11 00 10 
100000001 1_00001 101 1 1 
1 00000001 1_00001 1 1 100 
1 0000001 00_000 1 000000 
1 000000 1 0 1 _000 1 000 1 0 1 

30 1 0000001 01_0001 001 010 
10000001 10_0001 001 110 
10000001 1 1_0001 01001 1 
1 00000 1 000_0001 01 1 000 
1000001 000_0001 01 1 1 00 

35 1000001001_0001 100001 
1000001010_0001 100101 
100000101 1_0001 101010 
1000001 100_0001 101 1 1 1 
1000001 101_0001 1 1001 1 

40 1000001 110_0001 11 1000 
1000001 1 1 1_0001 1 1 1 1 00 
1 00001 0001_001 0000001 
100001 001 0_001 00001 1 0 
100001001 1_0010001010 

45 1 00001 01 00_001 0001111 
10000101 10_0010010011 
100001 01 11_001001 1000 
1 00001 1 000_001 001 1 1 00 
1 00001 1 01 0_001 0 1 00001 

50 100001 101 1_0010100101 
100001 1 101_0010101010 
1 00001 1 1 1 0_0U1 0101110 
1000100000_00101 10010 
1000100010_00101 101 1 1 

55 1000100011_0010111011 
1000100101_001 1000000 
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// W1004_2048 = -0.9981 18 
// W1005_2048 = -0.998302 
// W1006_2048 = -0.998476 
// W1008_2048 = -0.998795 
// W1010_2048 = -0.999078 
// W1 01 1_2048 = -0.999205 
// W1012_2048 = -0.999322 
// W1014_2048 = -0.999529 
// W1 016_2048 = -0.999699 
// W1017_2048 = -0.999769 
// W1018_2048 = -0.999831 
// W1020_2048 = -0.999925 
// W1022_2048 = -0.999981 
// W1023_2048 = -0.999995 
// W1 026_2048 = -0.999981 
// W1 029_2048 = -0.999882 
// W1032_2048 = -0.999699 
// W1035_2048 = -0.999431 
// W1 038_2048 ^ -0.999078 
// W1041_2048 = -0.998640 
// W1 044_2048 = -0.9981 1 8 
// W1 047_2048 = -0.99751 1 
// W1050_2048 = -0.996820 
// W1053_2048 = -0.996045 
// W1056_2048 = -0.995185 
// W1059_2048 = -0.994240 
// W1062_2048 = -0.993212 
// W1065_2048 = -0.992099 
// W1068_2048 = -0.990903 
// W1071_2048 = -0.989622 
// W1074_2048 = -0.988258 
// W1077_2048 = -0.986809 
// W1080_2048 = -0.985278 
// W1083_2048 - -0.983662 
// W1086_2048 = -0.981964 
// W1089_2048 = -0.980182 
// W1092_2048 = -0.978317 
// W1095_2048 = -0.976370 
// W1098_2048 = -0.974339 
// W1 101_2048 = -0.972226 
// W1 104_2048 = -0.970031 
// W1 107_2048 = -0.967754 
// W1 1 10_2048 = -0.965394 
// W1 1 13_2048 = -0.962953 
// W1 1 16_2048 = -0.960431 
// W1 1 19_2048 = -0.957826 
// W1 122_2048 = -0.955141 
// W1 125_2048 = -0.952375 
// W1 128_2048 = -0.949528 
// W1 131_2048 = -0.946601 
// W1 134_2048 = -0.943593 
// W1 137_2048 = -0.940506 
// W1 140_2b48 = -0.937339 
// W1 143_2048 = -0.934093 
// W1 146_2048 = -0.930767 
// W1 149_2048 = -0.927363 
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-0.061321 

-0.058258 

-0.055195 

-0.049068 

-0.042938 

-0.039873 

-0.036807 

-0.030675 

-0.024541 

-0.021474 

-0.018407 

-0.012272 

-0.006136 

-0.003068 

+0.006136 

+0.015339 

+0.024541 

+0.033741 

+0.042938 

+0.052132 

+0.061321 

+0.070505 

+0.079682 

+0.088854 

+0.098017 

+0.107172 

+0.116319 

+0.125455 

+0.134581 

+0.143695 

+0.152797 

+0.161886 

+0.170962 

+0.180023 

+0.189069 

+0.198098 

+0.2071 1 1 

+0.216107 

+0.225084 

+0.234042 

+0.242980 

+0.251898 

+0.260794 

+0.269668 

+0.278520 

+0.287347 

+0.296151 

+0.304929 

+0.313682 

+0.322408 

+0.331106 

+0.339777 

+0.348419 

+0.357031 

+0.365613 

+0.374164 
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10001001 1 1_001 1000100 
1000101001_001 1001000 
1000101011_0011001101 
1000101101_0011010001 
5 1000101111_0011010101 
10001 10000_001 101 1001 
1000110011_0011011110 
1000110101_0011100010 
1000110111_0011100110 

10 1000111001_0011101010 
1000111011_0011101111 
10001 11101_001 11 10011 
1000111111_0011110111 
1001000010_001 111 1011 

15 1001000100_0011111111 
10010001 10_0 10000001 1 
1001001001_0100000111 
1001001011_0100001011 
1001001 110_0100001111 

20 1 001 01 0000_01 0001 0011 
1001010011_0100010111 
1001010101_0100011011 
1001011000_0100011111 
1001011011_0100100011 

25 1001011101_0100100111 
1001100000_0100101011 
1001100011_0100101110 
1001 1001 10_01001 10010 
1001101001_0100110110 

30 1001101011_0100111010 
1001101110_0100111101 
1001110001_0101000001 
1001110100_0101000101 
1001110111_0101001000 

35 1001 111010_0101001 100 
1001 111 101_0101010000 
1 0 1 0000000_0 1 0 1 0 1 00 1 1 
1010000100_0101010111 
1010000111_0101011010 

40 1010001010_0101011110 
1010001 101_0101100001 
101001 0000_01 01 1 001 00 
1010010100_0101 101000 
1010010111_0101101011 

45 1010011010_0101101110 
1010011110_0101110010 
1010100001_0101110101 
1010100101_0101111000 
1010101000_0101111011 

50 1010101100_0101111111 
1010101 111_01 10000010 
1010110011_0110000101 
10101 101 10_01 10001000 
1010111010_0110001011 

55 101011 1110_0110001 110 
1011000001 0110010001 
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//W1152 


2048 


— 


-0.923880 


//W1155" 


'2048 




-0.920318 


//W1158" 


'2048 


— 


-0.916679 


//W1161" 


'2048 




-0.912962 


//W1164" 


'2048 




-0.909168 


//W1167" 


'2048 




-0.905297 


//W1170" 


"2048 




-0.901349 


//W1173' 


'2048 




-0.897325 


//W1176' 


'2048 
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-0.893224 


//W1179" 


'2048 
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-0.889048 


// W1182" 


"2048 




-0.884797 


//W1185' 


'2048 




-0.880471 


//W1188" 


'2048 




-0.876070 


//W1191" 


'2048 




-0.871595 


//W1194" 


"2048 




-0.867046 


//W1197' 


"2048 


— 


-0.862424 


//W1200' 


'2048 


— 


-0.857729 


//W1203' 


'2048 


— 


-0.852961 


//W1206' 


"2048 


— 


-0.848120 


//W1209" 


"2048 




-0.843208 


//W1212" 


"2048 




-0.838225 


//W1215" 


"2048 




-0.833170 


// W1218" 


"2048 


— 


-0.828045 


// W1221" 


"2048 


— 


-0.822850 


//W1224" 


"2048 




-0.817585 


// W1227' 


"2048 


— 


-0.812251 


//W1230' 


'2048 


— 


-0.806848 


//W1233" 


'2048 


— 


-0.801376 


//W1236" 


'2048 




-0.795837 


//W1239" 


"2048 




-0.790230 


// W1242' 


"2048 


- 


-0.784557 


// W1245" 


'2048 


- 


-0.778817 


//W1248' 


"2048 




-0.773010 


// W1251" 


"2048 


— 


-0.767139 


//W1254' 


"2048 




-0.761202 


//W1257" 


"2048 




-0.755201 


//W1260' 


"2048 




-0.749136 


//W1263" 


"2048 




-0.743008 


//W1266' 


"2048 


— 


-0.736817 


//W1269" 


"2048 


— 


-0.730563 


//W1272" 


"2048 




-0.724247 


//W1275" 


"2048 




-0.717870 


//W1278' 


"2048 




-0.711432 


//W1281" 


"2048 




-0.704934 


//W1284" 


"2048 




-0.698376 


//W1287" 


"2048 




-0.691759 


//W1290" 


'2048 




-0.685084 


//W1293" 


"2048 


— 


-0.678350 


//W1296" 


"2048 




-0.671559 


//W1299" 


"2048 




-0.664711 


//W1302" 


"2048 




-0.657807 


// W1305' 


"2048 




-0.650847 


//W1308" 


"2048 




-0.643832 


//W1311' 


"2048 




-0.636762 


//W1314' 


"2048 




-0.629638 


//W1317' 


"2048 




-0.622461 
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+0.382683 
+0.391170 
+0.399624 
+0.408044 
+0.416430 
+0.424780 
+0.433094 
+0.441371 
+0.44961 1 
+0.457813 
+0.465976 
+0.474100 
+0.482184 
+0.490226 
+0.498228 
+0.506187 
+0.514103 
+0.521975 
+0.529804 
+0.537587 
+0.545325 
+0.553017 
+0.560662 
+0.568259 
+0.575808 
+0.583309 
+0.590760 
+0.598161 
+0.60551 1 
+0.612810 
+0.620057 
+0.627252 
+0.634393 
+0.641481 
+0.648514 
+0.655493 
+0.662416 
+0.669283 
+0.676093 
+0.682846 
+0.689541 
+0.696177 
+0.702755 
+0.709273 
+0.715731 
+0.722128 
+0.728464 
+0.734739 
+0.740951 
+0.747101 
+0.753187 
+0.759209 
+0.765167 
+0.771061 
+0.776888 
+0.782651 
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1011000101 
1011001001 
1011001100 
1011010000 
5 1011010100 
1011011000 
1011011100" 
1011100000' 
1011100100" 

10 1011100111" 
1011101011" 
1011101111" 
1011110011" 
1011110111' 

15 1011111011' 
1100000000' 
1100000100' 
1100001000" 
1100001100" 

20 1100010000" 
1100010100" 
1100011000" 
1100011101" 
1100100001" 

25 1100100101' 
1100101001" 
1100101110" 
1100110010' 
1100110110' 

30 1100111011" 
1100111111" 
1101000011' 
1101001000' 
1101001100" 

35 1101010001" 
1101010101" 
1101011001" 
1101011110" 
1101100010" 

40 1101100111" 
1101101011' 
1101110000" 
1101110100" 
1101111001" 

45 1101111110" 
1110000010" 
1110000111" 
1110001011" 

niooiooool 

50 1110010100 
1110011001" 
1110011110" 
1110100010" 
1110100111" 

55 11101011001 
1110110000 
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_01 10010100 
_01 100101 11 
_0110011001 
_0110011100 
_0110011111 
_01 101 00010 
0110100100 
_0110100111 
0110101010 
.0110101100 
0110101111 
"0110110001 
0110110100 
0110110110 
0110111001 
0110111011 
0110111101 
0111000000 
0111000010 
0111000100 
0111000110 
"0111001001 
"0111001011 
0111001101 
0111001111 
0111010001 
0111010011 
0111010101 
0111010111 
0111011000 
0111011010 
0111011100 
0111011110 
0111011111 
0111100001 
0111100011 
0111100100 
0111100110 
'0111100111 
0111101001 
"0111101010 
0111101011 
0111101101 
0111101110 
0111101111 
0111110000 
0111110001 
0111110011 
0111110100 
"0111110101 
"0111110110 
0111110110 
0111110111 
0111111000 
0111111001 
0111111010 
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W1452" 
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W1467" 

W1470I 

W1473_ 

W1476_ 

W1479_ 

W1482 

W1485 
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_2048 = 
2048 = 
12048 = 
_2048 = 
_2048 = 
_2048 = 
2048 = 
""2048 = 
""2048 = 
"2048 = 
"2048 = 
"2048 = 
'2048 = 
"2048 = 
12048 = 
2048 = 
"2048 = 
'2048 = 
"2048 = 
"2048 = 
"2048 = 
"2048 = 
'2048 = 
'2048 = 
'2048 = 
"2048 = 
"2048 = 
"2048 = 
"2048 = 
"2048 = 
"2048 = 
"2048 = 
"2048 = 
"2048 = 
"2048 = 
'2048 = 
'2048 = 
'2048 = 
"2048 = 
"2048 = 
"2048 = 
2048 = 
"2048 = 
'2048 = 
"2048 = 
'2048 = 
"2048 = 
2048 = 
"2048 = 
"2048 = 
2048- 
2048 = 
2048 = 
2048 = 
2048 = 
2048 = 



= -0.615232 
= -0.607950 
= -0.600616 
= -0.593232 
= -0.585798 
= -0.578314 
= -0.570781 
= -0.563199 
= -0.555570 
= -0.547894 
= -0.540171 
: -0.532403 
= -0.524590 
= -0.516732 
= -0.508830 
= -0.500885 
= -0.492898 
= -0.484869 
= -0.476799 
= -0.468689 
= -0.460539 
■ -0.452350 

• -0.444122 

• -0.435857 
■■ -0.427555 

-0.419217 
-0.410843 
-0.402435 
-0.393992 
-0.385516 
-0.377007 
-0.368467 
-0.359895 
-0.351293 
-0.342661 
-0.334000 
-0.325310 
-0.316593 
-0.307850 
-0.299080 
-0.290285 
-0.281465 
-0.272621 
-0.263755 
-0.254866 
-0.245955 
-0.237024 
-0.228072 
-0.219101 
-0.210112 
-0.201105 
-0.192080 
-0.183040 
-0.173984 
-0.164913 
-0.155828 



+0.788346 

+0.793975 

+0.799537 

+0.805031 

+0.810457 

+0.815814 

+0.821103 

+0.826321 

+0.831470 

+0.836548 

+0.841555 

+0.846491 

+0.851355 

+0.856147 

+0.860867 

+0.865514 

+0.870087 

+0.874587 

+0.879012 

+0.883363 

+0.887640 

+0.891841 

+0.895966 

+0.900016 

+0.903989 

+0.907886 

+0.911706 

+0.915449 

+0.919114 

+0.922701 

+0.926210 

+0.929641 

+0.932993 

+0.936266 

+0.939459 

+0.942573 

+0.945607 

+0.948561 

+0.951435 

+0.954228 

+0.956940 

+0.959572 

+0.962121 

+0.964590 

+0.966976 

+0.969281 

+0.971504 

+0.973644 

+0.975702 

+0.977677 

+0.979570 

+0.981379 

+0.983105 

+0.984749 

+0.986308 

+0.987784 
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10 



15 



110110101 


01111 


1 1010 


// 


W1488 


2048 




-0 146730 

w. 1 ^W # WW 


+0 989177 


110111010" 

1 1 \J III W 1 w 


01111 


11011 


// 


W1491" 


"2048 

^ w~w 


_ 


-0 137620 

W« 1 W 1 V^^bW 


+0 990485 

I w.www~ww 


1 101 1 1 110" 

1 1 \J 1 1 1 1 1 w 


'01111 


11100 


// 


W1494" 


"2048 




-0 128498 

W* l«sW~WW 


+0 991710 


11100001 l" 

III WWww 1 1 


"01111 


11100 


// 


W1497' 


"2048 


__ 


-0 1 19365 

W. • 1 wwww 


+0 992850 

< w.ww^Uww 


111001000' 

III Ww 1 www 


'01111 


11101 


// 


W1 500' 


2048 

w~ w 





-0 110222 

W> 1 1 W^M^^ 


+0 993907 

^w.wwwwwf 


111001 100" 


"01111 


11101 


// 


W1503" 


'2048 


_ 


-0 101070 

W • 1 W B V f \J 


+0 994879 


1 1 1010001" 

III 1 I 


"01111 


11110 


// 


W1 506' 


2048 




-0 091909 

W • W W I W W W 


+0 995767 

' w.wwwf wr 


111010110' 

III W 1 W 1 i w 


'01111 


11110 


// 


W1509' 


"2048 

W~w 




-0 082740 


+0 996571 

^w.wwvjwf 1 


111011010' 

III W 1 1 W I w 


"01111 


11111 


// 


W1512' 


'2048 

*» w~w 




-0 073565 

W * \^ ( wW^^w 


+0 997290 

' WiWW/ www 


111011 11 l" 

III W 1 1 1 1 1 


'01111 


11111 


// 


W1515' 


"2048 




-0 064383 

W . W \^^T W w V> 


+0 997925 

' W.WWf W^W 


111100100" 


'01111 


11111 


// 


W1518" 


"2048 





-0 055195 


+0 998476 

' WiWWV^^Tf W 


111101000' 


'01111 


11111 


// 


W1521' 


"2048 




-0.046003 


+0.998941 


111101101 


'01111 


11111 


// 


W1524" 


"2048 




-0.036807 


+0.999322 


111110010' 


'01111 


11111 


// 


W1527" 


"2048 




-0.027608 


+0.999619 


111110111 


01111 


11111 


// 


W1530" 


"2048 




-0.018407 


+0.999831 


111111011 


'01111 


11111 


// 


W1533" 


'2048 




-0.009204 


+0.999958 



20 



25 



30 



35 



40 



45 



50 



55 



Listing 17 

// 512 point FFT twiddle factor coefficients (Radix 4+2). 
// Coefficients stored as non-fractional 1 0 bit integers (scale 1 
// Real Coefficient (cosine value) is coefficient high-byte. 
// Imaginary Coefficient (sine value) is coefficient low-byte. 



)• 



0111111111 

0111111111 

0111111111" 

0111111111 

0111111111" 

0111111111" 

0111111111" 

0111111110" 

0111111110' 

0111111101" 

0111111100' 

0111111011' 

0111111010' 

0111111001' 

0111111000" 

0111110111' 

0111110110" 

0111110101" 

0111110100" 

0111110010" 

0111110001" 

0111101111" 

0111101101' 

0111101100" 

0111101010" 

0111101000" 

0111100110" 

0111100100" 

0111100010' 

0111100000' 

0111011110' 

0111011011 



0000000000 
"1111111010 
'1111110011 
'1111101101 
'1111100111 
'1111100001 
'1111011010 
'1111010100 
'1111001110 
'1111001000 
"1111000001 
'1110111011 
'1110110101 
"1110101111 
"1110101000 
"1110100010 
"1110011100 
"1110010110 
'1110010000 
"1110001010 
'1110000100 
"1101111110 
"1101110111 
"1101110001 
"1101101011 
"1101100101 
"1101011111 
"1101011001 
"1101010100 
"1101001110 
"1101001000 
"1101000010 



// 


woooo 

w w w w w w 


0512 

WW 1 ^ 




+1 000000 

1 (WWWWWW 


-0 000000 

W.WWWWWW 


// 


W0001' 


'0512 




+0.999925 


-0.012272 


// 


W0002" 


"0512 




+0.999699 


-0.024541 


// 


W0003" 


"0512 




+0.999322 


-0.036807 


// 


W0004" 


"0512 




+0.998795 


-0.049068 


// 


W0005" 


'0512 




+0.998118 


-0.061321 


// 


W0006" 


"0512 




+0.997290 


-0.073565 


// 


W0007' 


'0512 




+0.996313 


-0.085797 


// 


W0008" 


"0512 




+0.995185 


-0.098017 


// 


W0009" 


'0512 




+0.993907 


-0.110222 


// 


W0010" 


"0512 




+0.992480 


-0.122411 


// 


W0011' 


"0512 




+0.990903 


-0.134581 


// 


wool 2' 


"0512 




+0.989177 


-0.146730 


// 


wool 3' 


'0512 




+0.987301 


-0.158858 


// 


wool 4" 


"0512 




+0.985278 


-0.170962 


// 


wool 5" 


"0512 




+0.983105 


-0.183040 


// 


WO0 16" 


"0512 




+0.980785 


-0.195090 


// 


wool 7" 


"0512 




+0.978317 


-0.207111 


// 


wool 8' 


"0512 




+0.975702 


-0.219101 


// 


wool 9' 


"0512 




+0.972940 


-0.231058 


// 


W0020" 


"0512 




+0.970031 


-0.242980 


// 


W0021' 


"0512 




+0.966976 


-0.254866 


// 


W0022' 


"0512 




+0.963776 


-0.266713 


// 


W0023" 


"0512 




+0.960431 


-0.278520 


// 


W0024' 


"0512 




+0.956940 


-0.290285 


// 


W0025' 


"0512 




+0.953306 


-0.302006 


// 


W0026' 


"0512 




+0.949528 


-0.313682 


// 


W0027" 


"0512 




+0.945607 


-0.325310 


// 


W0028" 


"0512 




+0.941544 


-0.336890 


// 


W0029' 


"0512 




+0.937339 


-0.348419 


// 


W0030' 


'0512 




+0.932993 


-0.359895 


// 


W0031" 


"0512 




+0.928506 


-0.371317 
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0111011001 
0111010111 
0111010100 
0111010001 
5 0111001111 
0111001100 
0111001001 
0111000110 
0111000100 

10 0111000001' 
0110111101" 
0110111010" 
0110110111' 
0110110100' 

15 0110110001" 
0110101101" 
0110101010" 
0110100110" 
0110100011" 

20 0110011111" 
0110011011" 
0110010111' 
0110010100" 
0110010000" 

25 0110001100" 
0110001000" 
0110000100" 
0110000000"" 
0101111011" 

30 0101110111" 
01011100111 
0101101110 
0101101010" 
01011001101 

35 0101100001_ 
0101011100 
0101011000" 
0101010011_ 
0101001110_ 

40 0101001010_ 
0101000101 

oioiooooool 

0100111011 
0100110110_ 

45 01001 10001_ 
0100101100 
0100100111" 
0100100010 
0100011100 

50 0100010111 
0100010010 
0100001101" 
0100000111" 
0100000010' 

55 0011111100' 
0011110111' 
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1100111100 
1100110110 
1100110001 
1100101011 
1100100101 
1100011111 
1100011010 
'1100010100 
_1 100001 111 
_1 100001 001 
_1 100000100 
_1011111110 
_1011111001 
_101 11 10011 
_1011101110 
_1011101001 
_1011100100 
_1011011110 
_1011011001 
_1011010100 
_1011001111 
JOIIOOIOlO 
1011000101 
J 01 1000000 
1010111011 
1010110110 
1010110010 
"1010101101 
1010101000 
1010100100 
1010011111 
1010011010 
1010010110 
1010010010 
1010001101 
1010001001 
"1010000101 
1010000000 
1001111100 
1001111000 
1001110100 
1001110000 
1001101100 
'1001101001 
1001100101 
1001100001 
1001011101 
1001011010 
1001010110 
1001010011 
1001001111 
1001001100 
1001001001 
1001000110 
1001000011 
1000111111 



// W0032 
// W0033 
// W0034 
// W0035 
// W0036" 
// W0037' 
// W0038" 
// W0039" 
//W0040" 
//W0041" 
// W0042" 
//W0043" 
//W0044" 
// W0045' 
// W0046" 
//W0047" 
// W0048" 
//W0049" 
//W0050" 

//woo5r 

// W0052" 
// W0053" 
// W0054" 
// W0055" 
// W0056" 
//W0057" 
//W0058" 
// W0059~ 

// wooeol 

//W0061_ 
// W0062_ 
// W0063 
// W0064 
// W0065" 
//W0066 
// W0067 
// W0068 
// W0069 
// W0070 
//W0071 
// W0072" 
// W0073' 
// W0074' 
//W0075" 
//W0076" 
// W0077" 
// W0078" 
// W0079" 
// W0080' 
//W0081" 
// W0082" 
// W0083" 
// W0084" 
// W0085" 
■// W0086" 
// W0087" 



0512 = +0.923880 
0512 = +0.919114 
_0512 = +0.914210 
0512 = +0.909168 
0512 = +0.903989 
0512 = +0.898674 
0512 = +0.893224 
0512 = +0.887640 
0512 = +0.881921 
0512 = +0.876070 
0512 = +0.870087 
0512 = +0.863973 
0512 = +0.857729 
0512 = +0.851355 
0512 = +0.844854 
0512 = +0.838225 
0512 = +0.831470 
0512 = +0.824589 
0512 = +0.817585 
0512 = +0.810457 
_0512 = +0.803208 
_0512 = +0.795837 
_0512 = +0.788346 
_0512 = +0.780737 
_0512 = +0.773010 
_0512 = +0.765167 
0512 = +0.757209 
_0512 = +0.749136 
_0512 = +0.740951 
_0512 = +0.732654 
_0512 = +0.724247 
0512 = +0.715731 
0512 = +0.707107 
_0512 = +0.698376 
0512 = +0.689541 
0512 = +0.680601 
_0512 = +0.671559 
0512 = +0.662416 
0512 = +0.653173 
0512 = +0.643832 
0512 = +0.634393 
0512 = +0.624859 
0512 = +0.615232 
0512 = +0.605511 
0512 = +0.595699 
0512 = +0.585798 
0512 = +0.575808 
0512 = +0.565732 
0512 = +0.555570 
0512 = +0.545325 
0512 = +0.534998 
0512 = +0.524590 
0512 = +0.514103 
0512 = +0.503538 
0512 = +0.492898 
0512 = +0.482184 



-0.382683 

-0.393992 

-0.405241 

-0.416430 

-0.427555 

-0.438616 

-0.449611 

-0.460539 

-0.471397 

-0.482184 

-0.492898 

-0.503538 

-0.514103 

-0.524590 

-0.534998 

-0.545325 

-0.555570 

-0.565732 

-0.575808 

-0.585798 

-0.595699 

-0.605511 

-0.615232 

-0.624859 

-0.634393 

-0.643832 

-0.653173 

-0.662416 

-0.671559 

-0.680601 

-0.689541 

-0.698376 

-0.707107 

-0.715731 

-0.724247 

-0.732654 

-0.740951 

-0.749136 

-0.757209 

-0.765167 

-0.773010 

-0.780737 

-0.788346 

-0.795837 

-0.803208 

-0.810457 

-0.817585 

-0.824589 

-0.831470 

-0.838225 

-0.844854 

-0.851355 

-0.857729 

-0.863973 

-0.870087 

-0.876070 
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0011110001 
0011101100" 
0011100110" 
0011100001 
5 0011011011_ 
0011010101 
0011001111" 
0011001010" 
0011000100" 

10 0010111110" 
0010111000" 
0010110010 
0010101100" 
0010100111 

15 0010100001 

001001 101 r 

0010010101 

0010001111" 

0010001001" 

20 0010000010" 
0001111100" 
0001110110" 
0001110000" 
0001101010" 

25 0001100100" 
0001011110" 
0001011000' 
0001010001" 
0001001011" 

30 0001000101" 
0000111111" 
0000111000" 
0000110010" 
0000101100" 

35 0000100110' 
0000011111" 
0000011001" 
0000010011" 
0000001101" 

40 0000000110" 
0000000000" 
1111111010" 
1111110011' 
1111100111' 

45 1111011010' 
1111010100' 
1111001110" 

imooooor 

1110110101" 
50 1110101111" 
1110101000" 
1110011100' 
1110010000" 
1110001010" 
55 1110000100" 
1101110111" 



1000111100 
1000111010 
1000110111 
1000110100 
1000110001 
1000101111 
1000101100 
1000101001 
1000100111 
1000100101 
1000100010 
1000100000 
1000011110 
1000011100 
1000011010 
1000011000 
1000010110 
1000010100 
1000010011 
1000010001 
1000001111 
1000001110 
1000001100 
1000001011 
1000001010 
1000001001 
1000001000 
1000000111 
"1000000110 
1000000101 
1000000100 
1000000011 
1000000010 
1000000010 
1000000001 
1000000001 
"1000000001 
"1000000000 
"1000000000 
1000000000 
"1000000000 
"1000000000 
"1000000000 
"1000000001 
"1000000001 
"1000000010 
"1000000010 
"1000000100 
"1000000110 
"1000000111 
"1000001000 
"1000001010 
"1000001100 
'1000001110 
"1000001111 
"1000010011 



// W0088 
// W0089' 
// W0090" 
// W0091" 
// W0092" 
// W0093' 
// W0094' 
// W0095' 
// W0096' 
// W0097" 
// W0098' 
// W0099' 
//wo 100" 
// W0101" 
//wo 102" 
//wo 103' 
//wo 104' 
//wo 105' 
//wo 106' 
//wo 107' 
//wo 108' 
//wo 109" 
// W0110" 
// W0111" 
//won 2' 

//won 3" 

// W0114" 

//won 5" 

// W0116" 

//won 7" 
//won 8" 

// W0119' 
//wo 120" 
// W0121" 
//wo 122" 
//wo 123" 
//wo 124" 
//wo 125" 
//wo 126" 
//wo 127" 
//wo 128" 
//wo 129" 
//wo 130" 
//wo 132" 
//wo 134" 
//wo 135" 
//wo 136" 
//wo 138" 
//wo 140" 
//wo 141" 
//wo 142" 
//wo 144" 
//wo 146" 
//wo 147" 
//wo 148" 
//wo 150" 



0512 
0512 
"0512 
"0512 
"0512 
"0512 
"0512 
"0512 
"0512 
"0512 
"0512 
0512 
"0512 
0512 
0512 
0512 
"0512 
"0512 
"0512 
"0512 
0512 
"0512 
0512 
0512 
0512 
"0512 
"0512 
"0512 
"0512 
"0512 
0512 
"0512 
0512 
"0512 
0512 
"0512 
0512 
0512 
"0512 
"0512 
"0512 
"0512 
0512 
"0512 
"0512 
0512 
"0512 
0512 
"0512 
"0512 
"0512 
"0512 
0512 
0512 
0512 
"0512 



+0.471397 
+0.460539 
+0.449611 
+0.438616 
+0.427555 
+0.416430 
+0.405241 
+0.393992 
+0.382683 
+0.371317 
+0.359895 
+0.348419 
+0.336890 
+0.325310 
+0.313682 
+0.302006 
+0.290285 
+0.278520 
+0.266713 
+0.254866 
+0.242980 
+0.231058 
+0.219101 
+0.207111 
+0.195090 
+0.183040 
+0.170962 
+0.158858 
+0.146730 
+0.134581 
+0.122411 
+0.110222 
+0.098017 
+0.085797 
+0.073565 
+0.061321 
+0.049068 
+0.036807 
+0.024541 
+0.012272 
+0.000000 
-0.012272 
-0.024541 
-0.049068 
-0.073565 
-0.085797 
-0.098017 
-0.122411 
.146730 
.158858 
.170962 
.195090 
-0.219101 
-0.231058 
-0.242980 
-0.266713 



-0. 
-0. 
-0. 
-0. 



0.881921 
0.887640 
0.893224 
0.898674 
0.903989 
0.909168 
0.914210 
0.919114 
0.923880 
0.928506 
0.932993 
0.937339 
0.941544 
0.945607 
0.949528 
0.953306 
0.956940 
0.960431 
0.963776 
0.966976 
0.970031 
0.972940 
0.975702 
0.978317 
980785 
983105 
985278 
987301 
989177 
0.990903 
0.992480 
0.993907 
0.995185 
0.996313 
0.997290 
0.998118 
0.998795 
0.999322 
0.999699 
0.999925 
1.000000 
0.999925 
0.999699 
0.998795 
0.997290 
0.996313 
0.995185 
0.992480 
0.989177 
0.987301 
0.985278 
0.980785 
0.975702 
0.972940 
0.970031 
0.963776 
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1101101011 

1101100101 
1101011111 
1101010100 
5 1101001000 
1101000010 
1100111100 
1100110001 
1100100101 
10 1100011111' 
1100011010" 
1100001111" 
1100000100" 
1011111110" 
15 1011111001' 
1011101110" 
1011100100' 
1011011110' 
1011011001" 
20 1011001111" 
1011000101" 
1011000000" 
1010111011" 
1010110010" 
25 1010101000" 
1010100100" 
1010011111" 
1010010110" 
1010001101" 
30 lOIOOOIOOr 
1010000101_ 
1001111100 
10011101001 
1001110000_ 
35 1001101100_ 
1001100101_ 
1001011101 
1001011010 
1001010110 
40 1001001111 
1001001001" 
1001000110" 
1001000011" 
1000111100" 
45 1000110111' 
1000110100' 
1000110001" 
1000101100' 
1000100111" 
50 1000100101' 
1000100010" 
1000011110" 
1000011010" 
1000011000" 
55 1000010110" 
1000010011" 



1000010110 
1000011000 
1000011010 
1000011110 
1000100010 
1000100101 
1000100111 
1000101100 
1000110001 
1000110100 
1000110111 
1000111100 
1001000011 
1001000110 
1001001001 
1001001111 
1001010110 
1001011010 
1001011101 
1001100101 
1001101100 
_1001 110000 
_1001 110100 
_1001111100 
_1010000101 
JOIOOOIOOl 
.1010001101 
_1010010110 
,1010011111 
_1010100100 
1010101000 
1010110010 
1010111011 
_101 1000000 
1011000101 
1011001111 
1011011001 
1011011110 
1011100100 
1011101110 
1011111001 
1011111110 
1100000100 
1100001111 
1100011010 
1100011111 
1100100101 
1100110001 
1100111100 
1101000010 
1101001000 
1101010100 
1101011111 
1101100101 
1101101011 
1101110111 



//wo 152 
//wo 153 
//wo 154" 
//wo 156 
//wo 158" 
//wo 159" 
//wo 160" 
//wo 162' 
//wo 164" 
//wo 165" 
//wo 166' 
//wo 168" 
//wo 170" 
//W0171" 
//wo 172" 
//wo 174" 
//wo 176" 
//wo 177" 
//wo 178" 
//wo 180" 
//wo 182" 
// W0183"■ 
// W0184" 
//wo 186" 
//wo 188" 
//W0 189" 
// W0190 
//W0 192 
//W0 194 
//W0 195 
//W0 196 
//W0 198 
// W0200 
// W0201 
// W0202" 
// W0204" 
// W0206" 
// W0207" 
// W0208' 
// W0210' 
// W0212' 
// W0213' 
// W0214" 
// W0216" 
// W0218' 
// W0219" 
// W0220" 
// W0222" 
// W0224" 
// W0225" 
// W0226" 
// W0228~ 
// W0230" 
// W0231 
// W0232"" 
// W0234~ 



_0512 
_0512 
_0512 
_0512 
_0512 
_0512 
0512 
~0512 
"0512 
"0512 
"0512 
"0512 
"0512 
"0512 
"0512 
"0512 
"0512 
"0512 
'0512 
"0512 
'0512 ■■ 
"0512 = 
"0512 = 
0512 : 
0512 : 
0512 = 
J0512 = 
_0512 = 
_0512 = 
_0512 = 
_0512 = 
0512 = 
"0512 = 
"0512 = 
10512 = 
0512 = 
"0512 = 
"0512 = 
"0512 = 
"0512 = 
"0512 = 
"0512 = 
"0512 = 
"0512 = 
0512 = 
"0512 = 
'0512 = 
"0512 = 
0512 = 
0512 = 
"0512 = 
'0512 = 
0512 = 
"0512 = 
0512 = 
0512 = 



= -0.290285 
= -0.302006 
= -0.313682 
= -0.336890 
= -0.359895 
= -0.371317 
= -0.382683 
= -0.405241 
= -0.427555 
= -0.438616 
= -0.449611 
= -0.471397 
= -0.492898 
= -0.503538 
= -0.514103 
= -0.534998 
= -0.555570 
= -0.565732 
= -0.575808 
= -0.595699 
= -0.615232 
= -0.624859 
= -0.634393 
= -0.653173 
= -0.671559 
= -0.680601 
= -0.689541 
= -0.707107 
= -0.724247 
= -0.732654 
= -0.740951 
= -0.757209 
= -0.7730i0 
= -0.780737 
= -0.788346 
-0.803208 
= -0.817585 
= -0.824589 
= -0.831470 
= -0.844854 
■■ -0.857729 
• -0.863973 
-0.870087 
-0.881921 
-0.893224 
-0.898674 
-0.903989 
-0.914210 
-0.923880 
-0.928506 
-0.932993 
-0.941544 
-0.949528 
-0.953306 
-0.956940 
-0.963776 



-0.956940 

-0.953306 

-0.949528 

-0:941544 

-0.932993 

-0.928506 

-0.923880 

-0.914210 

-0.903989 

-0.898674 

-0.893224 

-0.881921 

-0.870087 

-0.863973 

-0.857729 

-0.844854 

-0.831470 

-0.824589 

-0.817585 

-0.803208 

-0.788346 

-0.780737 

-0.773010 

-0.757209 

-0.740951 

-0.732654 

-0.724247 

-0.707107 

-0.689541 

-0.680601 

-0.671559 

-0.653173 

-0.634393 

-0.624859 

-0.615232 

-0.595699 

-0.575808 

-0.565732 

-0.555570 

-0.534998 

-0.514103 

-0.503538 

-0.492898 

-0.471397 

-0.44961 1 

-0.438616 

-0.427555 

-0.405241 

-0.382683 

-0.371317 

-0.359895 

-0.336890 

-0.313682 

-0.302006 

-0.290285 

-0.266713 
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1000001111 
1000001110" 
1000001100" 
1000001010" 
5 1000001000" 
1000000111" 
1000000110" 
1000000100" 
1000000010" 

10 1000000010" 
1000000001" 
1000000001" 
1000000000" 
1000000000" 

15 1000000000" 
1000000001" 
1000000010" 
1000000101" 
1000001000" 

20 1000001011" 
1000001111" 
1000010100" 
1000011010" 
1000100000" 

25 1000100111" 
1000101111" 
1000110111" 
1000111111" 
1001001001" 

30 1001010011" 
1001011101" 
1001101001" 
1001110100" 
1010000000" 

35 1010001101" 
1010011010" 
1010101000" 
1010110110" 
1011000101" 

40 1011010100" 
1011100100" 
1011110011" 
1100000100" 
1100010100" 

45 1100100101" 
1100110110" 
1101001000" 
1101011001" 
, .1101101011" 

50 110^111110' 
1110010000" 
1110100010" 
1110110101" 
1111001000" 

55 1111011010" 
1111101101" 



1110000100 
1110001010 
"1110010000 
"1110011100 
1110101000 
"1110101111 
"1110110101 
"1111000001 
"1111001110 
"1111010100 
"1111011010 
"1111100111 
"1111110011 
1111111010 
"0000001101 
0000011111 
0000110010 
0001000101 
"0001011000 
0001101010 
"0001111100 
0010001111 
"0010100001 
"0010110010 
0011000100 
0011010101 
"0011100110 
0011110111 
"0100000111 
"0100010111 
0100100111 
"0100110110 
"0101000101 
0101010011 
0101100001 
"0101101110 
0101111011 
0110001000 
"0110010100 
0110011111 
0110101010 
"0110110100 
0110111101 
0111000110 
0111001111 
0111010111 
0111011110 
0111100100 
0111101010 
0111101111 
"0111110100 
0111110111 
0111111010 
0111111101 
0111111111 
0111111111 



// W0236 
//W0237" 
// W0238" 
// W0240" 
// W0242" 
// W0243" 
// W0244" 
// W0246" 
// W0248" 
// W0249" 
// W0250" 
// W0252" 
// W0254" 
// W0255" 
// W0258" 
//W0261" 
// W0264" 
// W0267" 
// W0270" 
// W0273" 
// W0276" 
// W0279" 
//W0282" 
//W0285" 
// W0288" 
//W0291" 
// W0294" 
// W0297" 
// W0300" 
// W0303" 
// W0306" 
// W0309" 
//W0312" 
//W0315" 
//W0318" 
//W0321" 
// W0324" 
// W0327" 
// W0330" 
// W0333" 
// W0336" 
// W0339" 
// W0342" 
// W0345" 
// W0348" 
//W0351' 
// W0354" 
// W0357' 
// W0360" 
// W0363" 
// W0366" 
// W0369" 
// W0372" 
// W0375" 
// W0378" 
// W0381' 



0512 
0512 
0512 
"0512 
0512 
0512 
"0512 
0512 
0512 
0512 
0512 
0512 
0512 
0512 
0512 
0512 
"0512 
0512 
"0512 
0512 
0512 
0512 
"0512 
0512 
0512 
0512 
0512 
0512 
0512 
0512 
"0512 
"0512 
0512 
0512 
"0512 
0512 
"0512 
"0512 
"0512 
0512 
0512 
0512 
0512 
"0512 
0512 
0512 
0512 
0512 
0512 
"0512 
0512 
0512 
0512 
0512 
"0512 
"0512 



-0.970031 
-0.972940 
-0.975702 
-0.980785 
-0.985278 
-0.987301 
-0.989177 
-0.992480 
-0.995185 
-0.996313 
-0.997290 
-0.998795 
-0.999699 
-0.999925 
-0.999699 
-0.998118 
-0.995185 
-0.990903 
-0.985278 
-0.978317 
-0.970031 
-0.960431 
-0.949528 
-0.937339 
-0.923880 
-0.909168 
-0.893224 
-0.876070 
-0.857729 
-0.838225 
-0.817585 
-0.795837 
-0.773010 
-0.749136 
-0.724247 
-0.698376 
-0.671559 
-0.643832 
-0.615232 
-0.585798 
-0.555570 
-0.524590 
-0.492898 
-0.460539 
-0.427555 
-0.393992 
-0.359895 
-0.325310 
-0.290285 
-0.254866 
-0.219101 
-0.183040 
-0.146730 
-0.110222 
-0.073565 
-0.036807 



-0.242980 

-0.231058 

-0.219101 

-0.195090 

-0.170962 

-0.158858 

-0.146730 

-0.122411 

-0.098017 

-0.085797 

-0.073565 

-0.049068 

-0.024541 

-0.012272 

+0.024541 

+0.061321 

+0.098017 

+0.134581 

+0.170962 

+0.207111 

+0.242980 

+0.278520 

+0.313682 

+0.348419 

+0.382683 

+0.416430 

+0.44961 1 

+0.482184 

+0.514103 

+0.545325 

+0.575808 

+0.605511 

+0.634393 

+0.662416 

+0.689541 

+0.715731 

+0.740951 

+0.765167 

+0.788346 

+0.810457 

+0.831470 

+0.851355 

+0.870087 

+0.887640 

+0.903989 

+0.919114 

+0.932993 

+0.945607 

+0.956940 

+0.966976 

+0.975702 

+0.983105 

+0.989177 

+0.993907 

+0.997290 

+0.999322 
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Listing 18 

Copyright (c) Pioneer Digital Design Centre Limited 

NAME: piiloc_rthv 
PURPOSE: Pilot location 
CREATED: June 1997 BY: T. Foxcroft 
15 MODIFIED: 

USED IN PROJECTS: cofdm only. 

20 /*FOLDENDS*/ ' 

/*FOLDBEGINS 0 0 "Defines"*/ 
define FFTSIZE 2048 

"define DATABINS 1705 

"define SCATNUM 45 
25 'define SCALEFACTOR64Q 3792 //3x8192/sqrt(42) 

"define SCALE FACTOR 16Q 3886 //3x8192/sqrt(10r2 

"define SCALEFACTORQPS 2172 //3x8192/sqrt(2)*8 

^defin^s AVERAGESF 12'hc49 //0.04x4096x32768/1705 = 3145 

30 module chanest (elk. resync. in_valid. in_data. constellation. 

u_symbol. us^pilots. uc_pilots, ct pilots, out tps. tps valid 
uncorrected Jq, ~ - r- • k _ 

out_valid, outi. outq. c_symbol, incfreq. wrstrb. ramindata. 
ramoutdata, ramaddr); 
35 TFOLDBEGINS 0 0 "i/o"*/ 

input elk, resync. in_valid; 

input [23:0] in_data; 

input [1:0] constellation; 

output u_symbol; 
40 output us_pilots. uc_pilots, ct_pilots- 

output out_tps, tps_valid; 

output [23:0] uncorrected Jq; 

output out_valid; 

output [7:0] outi; 
45 output [7:0] outq; 

output c_symbol; 

output incfreq; 

output wrstrb; 

output [23:0] ramindata; 
50 input [23:0] ramoutdata; 

output [10:0] ramaddr; 

/•FOLDENDS*/ 

TFOLDBEGINS 0 0 'TPS location "*/ 
55 reg [10:0] tpsloc; 
reg [4:0] tpscount; 
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always @(tpscount) 
begin 

case(tpscount) 



5'bOOOOO: 


tpsloc 


— 


34; 


S^bOOOOl: 


tpsloc 




50; 


5'bOOOIO: 


tpsloc 


— 


209; 


5'bOOOII: 


tpsloc 


= 


346; 


5'bOOIOO: 


tpsloc 




413; 


5'b00101: 


tpsloc 


= 


569; 


5'b00110: 


tpsloc 




595; 


5'b00111: 


tpsloc 




688; 


5'bOIOOO: 


tpsloc 




790; 


5*b01001: 


tpsloc 




901; 


5^b01010: 


tpsloc 




1073 


5'bOIOII: 


tpsloc 




1219 


5*b01100: 


tpsloc 




1262 


5'b01101: 


tpsloc 




1286 


S'bOmO: 


tpsloc 




1469 


5'b01111: 


tpsloc 




1594 


default: tpsloc = 


1687; 


endcase 








end 








rFOLDENDS*/ 







TFOLDBEGINS 0 0 "continuous pilot location"*/ 
25 reg [10:0] contloc; 

reg [5:0] contloccount; 
always ©(contloccount) 
begin 

case(contloccount) 
30 6'bOOOOOO: contloc = 0; 

6'b000001: contloc = 48; 

6'b000010: contloc = 54; 

6'b00001 1 : contloc = 87; 

6'b0001 00: contloc = 141 ; 
35 6'b000101: contloc =156; 

6*b000110: contloc = 192; 

6'b0001 1 1 : contloc = 201 ; 

6'b001000: contloc = 255; 

6'b001 001 : contloc = 279; 
40 6'b001010: contloc = 282; 

6'b001011: contloc = 333; 

6'b001 100: contloc = 432; 

6*b001 101: contloc = 450; 

6'b001 1 10: contloc = 483; 
45 6'b001 111: contloc = 525; 

6'b010000: contloc = 531; 

6'b0 10001: contloc = 618; 

6'b010010: contloc = 636; 

6'b010011: contloc = 714; 
50 6'b010100: contloc = 759; 

6'b010101: contloc = 765; 

6'b010110: contloc = 780; 

6*b010111: contloc = 804; 

6*b01 1000: contloc = 873; 
55 6*b0 11001: contloc = 888 ; 

6'b011010: contloc = 918; 
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10 



15 



20 



25 



30 



35 



40 



45 



50 



55 



6'b011011: 


contloc 


— 


939; 


S'bOmOO: contloc 


— 


942; 


6'b011101: 


contloc 




969; 


6'b011110: 


contloc 


— 


984; 


6'b011111: 


contloc 


— 


1050 


6'b1 00000: 


contloc 


— 


1101 


6'b 100001: 


contloc 


— 


1107 


6'b100010: 


contloc 


— 


1110 


6'b1 00011: 


contloc 


— 


1137 


6'blOOIOO: contloc 


— 


1140 


6'blOOIOI: 


contloc 




1146 


6'blOOIIO: 


contloc 




1206 


6'b100111: 


contloc 




1269; 


6'blOIOOO: contloc 




1323; 


6*b101001: 


contloc 




1377; 


6*b101010: 


contloc 




1491; 


6'b101011: 


contloc 




1683; 


default: contloc = 1704; 


endcase 









end 

TFOLDENDS*/ 

/•FOLDBEGINS 0 0 "continuous pilot location"*/ 

rreg [10:0] contloc [44:0]; 

reg [5:0] contloccount; 

initial 

begin 

contloc[0]= 0; contloc[1]= 48; contloc[2] = 54; contloc[3] = 87; contlocr4] = 141- 
cqnttoc[5] = 156; contloc[6] = 192; contIoc[7] = 201; contloc[8] = 255; contloc[9] = 



279; 
contloc[10 
contloc[14 
contlocflS 
contloc[1 9 
contloc[20 
contloc[24 
contloc[25 
contloc[29 
contloc[30 
contloc[34; 
contloc[35 
contloc[39' 
contloc[40' 
contloc[44' 
end V 



contloc[11] 
contloc[16] 
contloc[21] 
contloc[26] 



= 282; 
= 483: 
= 525; 
= 714; 
= 759; 
= 873; 
= 888; 
= 969; 
= 984; contloc[31] 
= 1110; 

= 1137; contloc[36] 
= 1269; 

= 1323; contloc[41] 
= 1704; 



= 333; contloc[12] 
= 531; contloc[17] 
= 765; contloc[22] 
= 918; contloc[27] 
= 1050; contloc[32] 
= 1140; contloc[37] 
= 1377; contloc[42] 



= 432; 



= 450 



contloc[1 3] 

= 618; contloc[18] = 636 

= 780; contloc[23] = 804 

= 939; contloc[28] = 942 

= 1101; contloc[33] =1107 

= 1146; contloc[38] = 1206 

= 1491; contloc[43] = 1683 



TFOLDENDS'/ 

TFOLDBEGINS 0 0 "Control vars"*/ 
reg [1 :0] constell; 
reg resynch; 

reg Valid.valid0.valid1.valid2.valid3.valid4,valid5,valid6.valid7.valid8; 
reg [1:0] whichsymbol; 

reg [1:0] pwhichsymbol; 
reg incwhichsymbol; 
reg [23:0] fftdata; 
reg [10:0] fftcount; 
reg [10:0] tapcount; 
reg [3:0] count12; 
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reg [3:0] dcount12; 
reg ramdata valid; 
reg tapinit; 
reg tapinit1,tapinit2; 
5 reg [7:0] nscat; 
reg pilot; 

reg tapload; //controls when the taps are loaded 
reg tapload2; 
reg shiftinnewtap; 
10 regfiltgo; 

/*FOLDENDS*/ 

TFOLDBEGINS 0 0 "Channel Est vars"*/ 

reg [11:0] tapi [5:0]; 

reg [11:0] tapq [5:0]; 
15 reg [27:0] sumi; 

reg [27:0] sumq; 

reg [11:0] chani; 

reg [11:0] chanq; 

wire [27:0] chani_; 
20 wire [27:0] chanq_; 

reg [11:0] idata; 

reg [1 1:0] qdata; 

/*FOLDENDS*/ 

/*FOLDBEGINS 0 0 "RAM vars"*/ 
25 reg [10:0] rannaddr; 

reg [10:0] pilotaddr; 

wire [10:0] ramaddr_; 

wire [10:0] rannaddrrev_; 

reg [23:0] ramindata; 
30 wire [23:0] ramoutdata; 

reg [23:0] rannout; 

reg [23:0] ramot; 

reg wrstrb; 

reg rwtoggle; 
35 reg framedata, framedataO; 

reg frav, firstfrav; 

reg [23:0] avchannel; 

reg [1 1:0] avchan; 

reg avlow; 
40 wire [23:0] avchan_: 

/*FOLDENDS*/ 

/*FOLDBEGINS 0 0 "Channel calc vars"*/ 
reg chan_val; 

reg Chan_val0,chan_val1.chan_val2.chan_val3,chan_val4,out_valid; 
45 reg [23:0] sum; 

reg [1 1:0] sumsq; 

reg [1 1 :0) sumsqtemp; 

reg [11:0] topreal; 

reg [1 1:0] topimag; 
50 reg [7:0] outi; 

reg [7:0] outitemp; 

reg [5:0] outitem; 

reg [7:0] outq; 

reg [10:0] prbs; 
55 //integer intsumi. intsumq/intsumsq.intoutijntoutq; 

/*FOLDENDS*/ 
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/*FOLDBEGINS 0 0 "uncorrected pilot vars"V 
reg u_symbol; 
reg us_pilots; 
reg uc_pilots; 
5 reg [23:0] uncorrectedjq; 
reg [2:0] tps_pilots; 
reg [5:0] tpsmajcount; 
wire [5:0] tpsmajcount_; 
reg ct jailots; 
10 reg outjps, tps_valid; 
reg [1:0] pilotdata; 
TFOLDENDS*/ 

TFOLDBEGINS 0 0 "pilot locate vars"V 
wire [1:0] which_symbol; 



cpoffset; 
pilotramaddr_; 
pilotramin_; 



15 wire [10:0 
wire [10:0 
wire [23:0; . 
wire pilotwnstrb_; 
wire found _pilots; 
20 reg pilotlocated; 

rPOLDENDSV 

rFOLDBEGINS 0 0 "sync function arrays"*/ 
reg [11:0] syncO; 
25 reg [11:0] synci; 
reg [11:0] sync2; 
reg [3:0] syncoffset; 

always @(dcount12 orvalidi or valid2) 
begin 

30 - if(valid1 || valid2) 

syncoffset = 4'hc-dcount12; 
else 

syncoffset = dcount12; 
rPOLDBEGINS 0 2 ""*/ 
35 case(syncot¥set) 
4'h1: 
begin 

syncO = 4046; synci = 272; sync2 = 95" 
end 

40 4*h2: 
begin 

syncO = 3899; synd = 476; sync2 = 168- 

end 

4*h3: 

45 begin 

syncO = 3661; synci = 614; sync2 = 217" 

end 

4'h4: 

begin 

50 syncO = 3344; synd = 687; sync2 = 243- 

end 
4'h5: 
begin 

syncO = 2963; synci = 701 ; sync2 = 248- 
oo end 
4*h6: 
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begin 

syncO = 2534; synci = 665; sync2 = 234; 

end 

4*h7: 

5 begin 

syncO = 2076; synci = 590; sync2 = 205; 

end 

4'h8: 

begin 

10 syncO = 1609; synd = 486; sync2 = 167; 

end 
4'h9: 
begin 

syncO =1152; synci = 364; sync2 = 123; 

15 



end 
4'ha: 
begin 

syncO = 722; synci = 237; sync2 = 78; 
20 end 

default 
begin 

syncO = 334; synci = 113; sync2 = 36; 
end 

25 endcase 

TFOLDENDS*/ 

end 

rFOLDENDS*/ 
always @(posedge elk) 
30 begin 

/*FOLDBEGINS 0 2 "Control "*/ 
constell <= constellation; 
resynch <= resync; 
if(resynch) 
35 begin 

TFOLDBEGINS 0 2 ""*/ 
valid <= 1'bO; 
validO <= rbO; 
vaiidi <= 1'bO; 
40 valid2 <= 1'bO; 

valid3 <= rbO; 
valld4 <= I'bO; 
valid5 <= rbO; 
valid6 <= rbO; 
45 vaiid7 <= 1'bO; 

validS <= I'bO; 
fftcount <=irbO; 
ramdatavalid <= 1 'bO; 
chan_val <= I'bO; 
50 tapinit <= I'bO; 

tapiniti <= I'bO; 
tapinit2 <= 1'bO; 
rwtoggle <= I'bO; 
rFOLDENDS*/ 
55 end 
else 
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begin 

rFOLDBEGINS 0 2 
valid <= in_valid; 
validO <= valid&&pilotlocated; 
validi <= validO; 
valid2 <= valid 1; 
valid3 <= valid2; 
valid4 <= valid3; 
validS <= valid4; 
valid6 <= validS; 
valid? <= validS; 
validS <= valid7; 
if(valid2) 



fftcount <= fftcount + rbl; 

chan^val <= valid4&&filtgo&&framedata- 

incwhichsymbol <= valid 1&&(fftcount == (TFTSIZE-1^V 

if(incwhichsymbol) 

begin 

rwtoggle <= loArtoggle; 
tapinit <= rbl; 
ramdatavalid <= rb1; 
end 

else if(valid6) 
tapinit <= rbO; 



tapiniti <= tapinit; 
tapinit2 <= tapiniti; 
TFOLDENDSV 
end 

fftdata <= in_data; 

rPOLDBEGINS 0 0 "frame averager*/ 

if(resynch) 

begin 

frav <= I'bO; 

firstfrav <= VbO\ 
end 
else 
begin 

if(chan_val&&framedata) 
frav <= rb1; 

else if(!framedata&&framedataO) 
frav<=rbO; 

if(chan_val&&framedata&&lfrav) 
firstfrav <= I'b1; 

else if(chan_val) 

firstfrav <= rbO* 

iSn° valO)^^ ^ ^ "calculate 0.2 x mean channel amplitude"*/ 
begin ~ 

if(firstfrav) 

begin 

avchannel <= avmult(sumsqtemp)- 
avchan <= avchanji 1:0]; 
end 
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else 

avchannel <= avmult(sumsqtemp) + avchannel; 
end 

TFOLDENDS*/ 
5 if(chan_val1) 

aviow <= (sumsqtemp<avchan)? 1 :0; 

end 

/*FOLDENDS*/ 
10 if(resynch) 
begin 

framedata <= rbO; 

framedataO <= I'bO; 
15 tapload <= rbO; 

end 
else 
begin 

framedataO <= framedata; 
20 if(incwhichsymbol&&(cpoffset==0)) 
framedata <= 1; 

else if(ramdatavalid&&valid2&&(fftcount == (cpoffset - 1))) 
framedata <= 1 ; 

else if(valid2&&(fftcount == (cpoffset + 'DATABINS))) 
25 framedata <= 0; 

tapload <= framedata; 

end 

filtgo <= ramdatavalid&&( valid2? tapload : filtgo); 
tapload2 <= valid&&tapload&&(count12==1 1)&&(fftcount!=0); 
30 pilot <= (count12==0); 
dcount12 <= count12; 

shiftinnewtap <= !((nscat == 139)| |(nscat == 140)| |(nscat == 141)); 

if(incwhichsymbol) 
35 begin 

if(!ramdatavaiid) 
begin 

whichsymbol <= pwhichsymbol; 

tapcount <= pwhichsymboI*2*b1 1 + cpoffset; 
40 end 
else 
begin 

whichsymbol <= whichsymbol + 1'b1; 

tapcount <= {whichsymbol[1]^whichsymbol[0].lwhichsymbol[01}*2'b1 1 + 
45 cpoffset; 
end 
end 
else 

if(framedata) 
50 begin 

if(fftcount==cpoffset) 
begin 

TFOLDBEGINS 0 4 "set up the counters"*/ 
//count12 <= ((4-whichsymbol)&4*b0011)*3; 
55 count12 <= {whichsymbol[1]'^whichsymbol[0],whichsymbol[0]}*Zb1 1 ; 
if(valid0) 
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nscat <= 8'bO; 
/•FOLDENDS*/ 

end 
else 

5 begin 

/*FOLDBEGINS 0 4 ""*/ 

if(vaiid) 

begin 

count12 <= (count12==11)? 4'bO : count12 + I'bl- 
10 tapcount <= tapcount + 1'b1• 

if(count12==11) 

nscat <= nscat + I'bl; 
end 

15 rPOLDENDS*/ 
end 

end 
else 
begin 

20 if(tapinit2&&valid5) 
nscat <= 8'bO; 
if(tapinit) 
begin 

if(valid3! !valid4| |valid5&&(whichsymbol==2'b0)) 
25 tapcount <= tapcount + 4*hc; 

else 

if(valid6) 

tapcount <= tapcount + 

{whichsymbol[1]'^wliiclnsymbol[0],whichsymboir0ir2'b11 + I'bl- 
30 end 

end 

rPOLDENDSV 

/•FOLDBEGINS 0 2 "Channel Estimation"*/ 
if(tapinit2) 
35 begin 

/*FOLDBEGINS 0 4 "Read in first 3 or 4 taps"*/ 
if(valid5) 

prbs <= alpha12(alpha(whichsymbol)); 
else 

if(valid6 1 1 valid? | i (valid8&&(whichsymbol==2'b0))) 

prbs <= alpha12(prbs): 

if(valid5) 

begin 

tapi[0] <= pseudo(ramout[23:12].1'b1); 

^5 taP'fl] <= pseudo(ramout[23:12].rb1)• 

tapl[2] <= pseudo(ramout[23:12].rb1): 
tapi[3] <= pseudo(ramout[23: 121. I'bl)- 
tapq[0] <= pseudo(ramout[11:0]. I'bl)' 

g„ tapq[1J <= pseudo(rannout[11:0]. I'bl); 

tapq[2] <= pseudo(ramout[11:0], 1'b1); 
encT^^ pseudo(ramout[11:0], I'bl); 

else if( !((whichsymbol!=2'b0)&&valid8)) 
begin " 

55 tapi[5] <= tapi[4]; 

tapi[4] <= tapi[3]; 
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tapi[3] <= tapi[2]; 
tapi[2] <= tapi[1]; 
tapi[1l <= tapi[0]; 

tapi[0] <= pseudo(ramout[23:12].prbs[0]); 
5 tapq[5] <= tapq[4^ 

tapq(4] <= tapq[3 
tapq[3] <= tapq[2 
tapq[2] <= tapq[1 
tapq[1] <= tapq[0 
1 0 tapq[0] <= pseudo(ramout[1 1 :0],prbs[0]); 

end 

TFOLDENDSV 
end 

15 else if(framedata) 

begin 

TFOLDBEGINS 0 4 "update taps in normal op."*/ 
if(tapload2) 
begin 

20 prbs <= alpha12(prbs); 

tapi[5] <= tapi(4]; 
tapi[4] <= tapi[3]; 
tapi[3] <= tapi[2]; 
tapi[2] <= tapi[1]; 
25 tapi[1] <=tapi[01; 

if(shiftinnewtap) 

tapi[0] <= pseudo{ramout[23:12],prbs[0]); 
tapq[5] <= tapq[4]; 
tapq[4] <= tapq[3]; 
30 tapq[3] <= tapq[2]; 

tapq[2] <= tapq[1]; 
tapq[1]<= tapq(0]; 
if(shiftinne\Artap) 

tapq[0] <= pseudo(ramout[11:0].prbs[0]); 
35 end 

TFOLDENDSV 
rrOLDBEGINS 0 4 "Channel interpolate"*/ 
if(pilot) 
begin 

40 if(vaiid4) 
begin 

chani <= tapi[3]; 

chanq <= tapq[3]; 
end 

45 if(valid3) 
begin 

idata <= ramot[23;12]; 
qdata <= ramot[11:0]; 
end 

50 end 
else 
begin 
if(validl) 
begin 

55 sumi <= mult(tapi[0],sync2) - mult(tapi[1].sync1); 

sumq <= mult{tapq[0],sync2); 
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end 

else if(valicl2) 
begin 

sumi <= sumi + mult(tapi(2],sync0); 
end^'"^ ^""^^ * rnult(tapq[2].sync0) - mult(tapq[1],sync1); 

else if(valid3) 
begin 

sumi<= sumi + mult(tapi[3].syncO) - mult(tapi[41.sync1)- 

sumq<= sun^q + mult(tapq[3].sync0) + 12'h800; //2048 for final round- 

idata <=ramot[23:12]; 
qdata <= ramotri1:01: 
15 end 

else if(valid4) 
begin 

chani <= chani_[23:12]; 
chanq <= chanq_[23:12I: 
20 end 
end 

//intsumi = (chani[1 1])? {20'hfffff.chaniri 1 :0]}:chani- 
/ intsumq = (chanq[11])? {20'hfffff.chanq[11:0]}:chanq; 
25 ^{'^(ghan_v^^^ 

end 
end 

assign chani_ = sumi + mult(tapi[5].sync2) + 12*h800- 
assign chanq_ = sumq + mult(tapq[5].sync2) - mult(tapq[4].sync1 )• 
30 assign avchan_ = avchannel + 24'h000800- f^ni j. y 

/*FOLDENDS*7 vjuuouu. 

TFOLDBEGINS 0 2 "Calculate channel"*/ 

always @(posedge elk) 

begin 

35 if(resynch) 
begin 

chan_val0 <= 1'b0; 

chan_val1 <= I'bO; 

chan_val2 <= rbO; 
40 chan_val3 <= I'bO; 

chan_val4 <= 1'bO; 

out_valid <= I'bO; ' 
end 
else 

45 begin 

chan_valO <= chan_val; 

chan_val1 <= chan_valO; 

chan_vaI2 <= chan_val1; 

chan_val3 <= chan_val2; 
50 chan_val4 <= chan_val3; 

//out_valid <= chan_val4; 
^^out^valid <= chan_val4&&ramdatavalid&&lpilotdata(1]; 

if(chan_val) 
55 sumsqtemp <= sum[22:11]: 

if(chan_valO) 
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topreal <= sum[23:12]; 
if(chan_val1) 
topimag <= sum[23:121; 
if{chan_vaI2) 
5 sumsq <= sum[23: 1 2]; 

if(chan_val3) 
begin 

outitemp <= divider(topreal, sumsq, (constell==0)); 
10 outitem <= divplussoft(topreal,sumsq.constell); 

end 

if(chan_val4) 
begin 

outq <= divider(topimag, sumsq, (constell==0)); 
15 outi <= outitemp; 

end 

//intouti = (outi[7])? {24'hffffff,outi[7:0]}:outi; 
//intoutq = (outq[7])? {24'hffffff,outq[7:0]}:outq; 
//if(chan_val&&ramdatavalid) $display(intsumi); 
20 //if(clnan_val4&&ramdatavalid) $dispiayb(outitemp,, outitem); 

end 

always @(chan_val or chan_valO or chan_val1 or chani or chanq or constell 
or idata or qdata or sumsqtemp) 
begin 

25 if{chan_val) 

sum = smult(chani,chani,1) + smult(chanq,chanq,1) + 24*h000400; 
else if(chan_valO) 

sum = smult(idata,chani,1) + smult(qdata,chanq.1) + 24*h000800; 
else if(chan_vat1) 

30 sum = smult(qdata,chani.1) - smult(idata,chanq.1) + 24'h000800; 

else //chan_val2 
begin 

case(constell) 

2*b00: 

35 sum = smult(sumsqtemp;SCALEFACTORQPS,0) + 24'h000800; 

ZbOl: 

sum = smult(sumsqtemp;SCALEFACTOR16Q.O) + 24'h000800; 
default: 

sum = smult(sumsqtemp/SCALEFACTOR64Q.0) + 24*h000800; 
40 endcase 
end 
end 

rPOLDENDSV 

/*FOLDBEGINS 0 2 "Extract Continual and scattered pilots for Freq + Sampling Error 
45 Block"*/ 

always @(posedge elk) 
begin 

if(resynch) 

contloccount <= 6*b0; 
50 else 

if(ramdatavalid&&valid2&&(pilbtaddr==contloc)) 

contloccount <= (contloccount == 44)? 6'bO : contloccount + 1*b1; 
if(ramdatavalid&&valid2&&((pilotaddr==contloc) | j pilot)) 
uncorrectedjq <= ramot; 
55 uc_pilots <= 

ramdatavalid&&framedata&&(pilotaddr==contloc)&&valid2&&!resynch; 
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us_pilots<=ramdatavalid&&framedata&&pilot&&valid2&&!resynch- 
"/7iJf"^^°' ''•esynch&&ramdatavalid&&(valid2? (pilotaddr==0) • u' symbol)- 

23- 21 uSco^r^r^^^^^ 

^ 23.12].,uncorrected_iq(11:0],.uc_pilots,.us_pilots); ~ 

end 

TFOLDENDS*/ 
rPOLDBEGINS 0 2 "Extract TPS pilots "V 
always @(posedge elk) 
10 begin 

if(resynch) 
begin 

tpscount <= 5'bO; 
tps_pilots <= 3'bO; 
15 tps_valid <= 1'bO; 

ct_pilots <= rbO; 
end 
else 
begin 

20 if(ramdatavalid&&valid2&&(pilotaddr==tpsloc)) 

tpscount <= (tpscount[4])? 5'bO ; tpscount + Vbr 

*%^piiots[or ''^"^^'^ '■amdatavalid&&framedata&&(pilotaddr==tpsloc) : 
tps_pilots[1] <= (chan_val? tps_pilots[01 : tps pilotsfll)- 
tps_pilots[2] <=tps_pilots[1]&&Hhan_tal3- 
tps_valid <= (tpscount==0)&&tps pilotsr2]- 
ct_pilots <= tps _pilots[2]; 
end 

if(resynch) 
30 tpsmajcount <= 6'bO; 

else 
begin 

if(tps_pilots[2]) 
begin 

35 if(tpscount==0) 
begin 

tpsmajcount <= 6'bO; 
out_tps <= tpsmajcount J5]; 

end 

40 else 

tpsmajcount <= tpsmajcount ; 
end ~ 

end 

if(resynch) 
45 pilotdata <= 2'bO; 

else 
begin 
if(valid2) 

pilotdata[0] <= ramdatavalid&&framedata&&( 

(pilotaddr==tpsloc)|| 
(pilotaddr==contloc)|| 
pilot 

55 PjJ°^clata[1]<=chan_val6?pilotdata[0]:pilotdata[1]: 
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//$display(pilotaddr..ramot[23:12],,valid2..contloccount„uncorrectedJq[2 
3:12],,uncorrectedjq[11:0],,uc_pilots„us_pilots); 
//$display(valid2,,pilotdata[0]„pilotdata[1],.pllotdata[2I.,ct .pilots.,., 
, .out_valid . .pilotaddr); 
5 end 

assign tpsmajcount_ = tps(topreal[1 1 J.tpscount.tpsmajcount); 
rFOLDENDSV 

rFOLDBEGINS 1 2 "pilot locate control "*/ 
10 always @(posedge elk) 
begin 

if(resynch) 

pilotlocated <= rbO; 

else 

15 if(found_pilots) 
begin 

pilotlocated <= rb1; 

pwhichsymbo! <= which_symbol + 2'b10; 
end 

20 end 

rFOLDENDSV 
TFOLDBEGINS 0 2 "RAM"*/ 
always @(posedge elk) 
begin 

25 if(piiotlocated) 
begin 

wrstrb <= IvalidO; 
if(valid) 

ramindata <= fftdata; 
30 pilotaddr <= ramaddr_ - cpoffset; 

ramaddr <= nArtoggle? ramaddr_ : ramaddrrev_; 
if(vaiid5) ramot <= rannout; 

end 
else 

35 begin 

TFOLDBEGINS 0 4 ""*/ 

wrstrb <= pilotwrstrb_; 

ramindata <= pilotramin_; 

ramaddr <= pilotramaddr_; 
40 TFOLDENDS*/ 
end 

ramout <= ramoutdata; 
end 

assign ramaddr_ = (tapinit] jframedata&&(valid2&&(count12==1 1)))? tapcount : 
45 fftcount; 

assign ramaddrrev_ = 

{ramaddrJ0].ramaddrJ1].ramaddrJ2].ramaddrJ31,ramaddrJ4].ramaddrJ5]. 

ramaddrJ6],ramaddrJ7].ramaddr_[8],ramaddrJ9].ramaddr [10]}; 
50 TFOLDENDS*/ 

assign c_symbol = whichsymbol[0]; 

rFOLDBEGINS 0 0 ""*/ 
always @(posedge elk) 
55 begin 
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//$display(chan_val.,framedata,.frav.,firstfrav...,valicl2,,valid4..out valid 
,,avchannel,.avchan,,sumsqtemp,..avlow.,chan_val1 ,,); ~ 
//$display(tps_valid.,out_tps,.tpscount,.tps_pilots[2]); 

//$display(in_data..filtgo..valid4,,tapload..,nscat..count12..fftcount..incw 
5 hichsymbol,,. 

//tapcount, .ramaddr, , wrstrb, ,rwtoggle 
//): 

//(resy nch , , valid , .fftcount. , ramaddr. . ramindatar23 : 12],, ramoutdatar23 • 1 21 t 
apinit,.tapinlt2.,tapcount.,ramout(23:12].. ' ^" 

10 //tapi[0].,tapi(1].,tapi[2],.tapi[3]..tapi[4]„tapi[5]); 

//$display(tapcount.,tapinit2..vaiid4.,vaiid.,valid2..wrstrb..fftcount fram 
®l^?'*?°"/"^''-2''*^P'f°J''*^P'f''l''*3P't2]..tapi[3]..tapi[4]..tapi[5]); 
//$display(....intouti.,intoutq,.out_valid.,..valid4,.valid2„chan val ,fjlt 
go..framedata..mcount„ramindatar23:121): 

15 //if(whichsymbol==1) 

$dlsplay(tapinit,.tapcount..fftcount,.ramindata[23:12]„., tapcount tapi[0] 
,.tapi[1] tapi[2],.tapi[3],.tapi[4],.tapi[5],,intsumi,.intsumq,,idata,.qda taV 
//$display(framedata,,pilotaddr,.mcount..tapcount,.ramaddr.,ramoutr23:12] 
ramindata 23:12].,prbs..us_pilots..uc_pilots.,ct_pilots..out valid.„contl occount.. 
20 //tps_pilots[0]„tps_piiots[1].,tps_pjlots[2]); 
end 

TFOLDENDSV 

pilioc pilloc (.clk(cik), .resync(resync). .in_valid(in_valid). .in data(in data) 
.found_pilots(found_pilots). .which_symbol(which_symbol).~ 
25 .cpoffset(cpoffset). .incfreq(incfreq) 

.ramaddr(pjlotramaddrJ , .ramin(pilotramin_). .ramout(ramout) 
.wrstrb(pilotwrstrb_)); 
TFOLDBEGINS 0 2 "functions"*/ 
TFOLDBEGINS 0 0 "tps demod "*/ 
30 function [5:0] tps; 
input tpssign; 
input [4:0] tpscount; 
input [5:0] tpsmajcount; 
reg tpsflip; 
35 begin 

case(tpscount) 

5'b00001 .5'bOOO1 1 ,5*b00100.5'b001 10.5'b0101 1,5'bO1 110: 
tpsflip = 0; //added 1 since tpscount already incremented 
default: 
40 tpsflip = 1 ; 

end case 

tps = (tpsflip'^tpssign)? tpsmajcount - I'bl : tpsmajcount + I'bl; 

endfunction 
45 /'FOLDENDS*/ 

/•FOLDBEGINS 0 0 "pseudo function"*/ 

function [1 1 :0] pseudo; 
input [11:0] data; 
50 input flip; 
begin 

pseudo = flip? -data + I'bl : data- 
end 

endfunction 
55 /*FOLDENDS*/ 

/•FOLDBEGINS 0 0 "averager multiplier"*/ 
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function [1 1:0] avmult; 
input [11:0] 1; 
reg [23:0] res; 
begin 

5 res = (i*^AVERAGESF) + 23'h000800; //multiply and round 

avmult = res[23:12]; 
end 

endfunction 

/*FOLDENDS*/ 
10 /*FOLDBEGINS 0 0 "filter tap multiplier"*/ 

function [27:0] mult; 

input [11:0] i; 

input [11:0] j; 

reg [23:0] res; 
15 reg [11:0] modi; 

reg [11:0] invi; 

begin 

invi = --i + I'bl; 
modi = i[11]? invi : i; 
20 res = (modi*j); //multiply and round 

mult = i[1 1]? {4*hf,-res} + Vbl : res; 

end 

endfunction 

/*FOLDENDS*/ 
25 /*FOLDBEGINS 0 0 "signed multiplier"*/ 

function [23:0] smult; 

input [11:0] i; 

input [11:0] j; 

input signed]; 
30 reg [23:0] res; 

reg [11:0] modi; 

reg [11:0] modj; 

begin 

modi = i[11]?H + rb1 : i; 
35 modj = (j[1 1]&&signedj)? + Vbl : j; 

res = (modi*modJ); 

smult = (i[11]'^a[11]&&signedj))? --res + Vbl : res; 
end 

endfunction 
40 /*FOLDENDS*/ 

/*FOLDBEGINS 0 0 "divider function"*/ 

function [7:0] divider; 

input [11:0] dividend; 

input [11-0] divisor; 
45 input qpsk; 

reg [1 1 :0] moddividend; 
reg signresult; 
reg [12:0] intval; 
50 reg [12:0] carry; 
reg [7:0] divide; 
reg [8:0] signeddivide; 
integer i; 
begin 

55 signresult = dividend[1 1]; 

moddividend = dividend[11]? --dividend + i'bl : dividend; 
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divide = 0; 

for(i=0;i<8;i=i+1) 
begin 

intval = carry - divisor 
divide[7-i] = !jntvai[12l; 
^^carry = (intval[12])? {carry[11:0],rbO} : {intval[11:0].rbO}: 

/•FOLDENDSV 

//signeddivide = signresult? -divide + 2'b10 ■ divide + Vb^■ 
signeddivide = signresult? {rb1. -divide} + 2'b10 : {I'bO divide) + VbV 

//$dj^splayb(signeddivide..divide..signresuit..conste la^^Dn * 
divider = signeddivide[8:1]; 

end 

endfunction 
TFOLDENDS*/ 

"""^ ''^^^~> 

input [11:0] dividend; 

input [11:0] divisor; 

input [1 :0] constellation; 

reg [1 1 :0] moddividend; 

reg signresult; 

reg [12:0] intval; 

reg [12:0] cany; 

reg [8:0] divide; 

reg [10:0] signeddivide; 

reg [11:0] fracdivide; 

integer i; 

begin 

signresult = dividend[1 1]; 

divide -1?"*^ = clividend[1 1]? -dividend + 1'bl : dividend; 

/*F9ldbVg5nso^^^^^^^ 

for(i=0;i<9;i=i+l) 
begin 

intval = carry - divisor 
divide[8-i] = lintval[12]; 

carry = (intval[1 2])? {carry(1 1 :0]. 1 'bO} : {intval[1 1 :0]. 1 'bO}; 
/*FOLDENDS*/ 

signeddivide = signresult? {2'b 11. -divide} + 1'bl : {2'b0,divide}; 

rF^XB^C^Si'^^^^^^^^ 

if(constellation==2'b0) 
begin 

//$writeh(..signeddivide.,„); 
signeddivide = signeddivide + 8'h80- 
//$ writeh(sig neddivide. , . , ) • 
if(signeddivide(10J) 

fracdivide = 9'hO; 

else 

if(signeddivide[9]||signeddivide[8]) 
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fracdivide = 12'h700; 

else 

begin 

fracdivide = signeddivide[7:0] + {signeddivider7:0],rb0} + 
5 {signeddivide[7:0],2'b0}; in 

fracdivide = fracdivide + 8*h80; 
end 

divplussoft = {3'b0,fracdivide[10:8]}; 
end 

10 else 

TFOLDENDS*/ 
/*FOLDBEGINS 0 2 "16qam"*/ 
if(constellation==2*b01 ) 
begin 

1 5 Swriteh(,.signeddivide„„); 

signeddivide = signeddivide + 8'hcO; 

Swriteh(„signeddivide„„); 

if(signeddivide[10]) 

begin 

20 signeddivide = 10'bO; 

fracdivide = 9'hO; 
end 
else 

if(signeddivide[9] 1 1 (signeddivide[8:7]==2'b11 )) 
25 begin 

fracdivide = 12*h380; 

signeddivide = 10'hlOO; 
end 
else 

30 begin 

fracdivide = signeddivide[6:0] + {signeddivide[6:0],rb0) + 
{signeddivide[6:0].ZbO}; in 
fracdivide = fracdivide + 8*h40; 
end 

35 divplussoft = {rb0.signeddivide[8:7].fracdivide[9:7]}; 

end 

TFOLDENDS*/ 
TFOLDBEGINS 0 2 "32qam"*/ 
else 
40 begin 

signeddivide = signeddivide + 8'heO; 

if(signeddivide[10]) 

begin 

45 signeddivide = 10'bO; 

fracdivide = 9'hO; 
end 
else 

if(signeddivide[9]| |(signeddivide[8:6]==3*b1 11)) 
50 begin 

signeddivide = 10*h180; 

fracdivide = 9'h1c0; 
end 
else 

55 begin 
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fracdivide = signeddivide[5:01 + {signeddividefSiOl VhO\ 
{signeddivide[5:0],2'b0}: //*7 
fracdivide = fracdivide + 8'h20; 
end 

divplussoft = {signeddivide[8:6],fracdivide[8:6]}; 
end 

TFOLDENDS*/ 
end 

endfunction 
/•FOLDENDS*/ 

TFOLDBEGINS 0 0 "PRBS alpha3/6/9/1 2 multiplier""/ 
function [10:0] alpha; 
input [1:0] which_symbol; 
begin 

case(which symbol) 

2'bO: 

alpha = irb1111lllllll; 
2'b01: 

alpha = irbOOOimil 11; 
2'b10: 

alpha = 11'bOO000O11111: 
2'b11: 

alpha = 1 1'bOOOOOOOOOl 1 ; 
endcase 
end 

endfunction 
TFOLDENDS*/ 

rFOLDBEGINS 0 0 "PRBS alpha 12 multiplier"*/ 
function [10:0] alpha12; 
input [1 0:0] prbsin; 
reg [10:0] prbsO 
reg [lO:Oj prbsl 
reg [10:0] prbs2 
reg [10:0] prbs3 
reg [10:0] prbs4 
reg [10:0] prbs5 
reg [10:0] prbsS 
reg [10:0] prbs7 
reg [10:0] prbs8 
reg [10:0] prbsQ 
reg [10:0] prbsl 0; 
begin 

prbsO = {prbsin[0] " prbsin[2].prbsin[10:1]}: 

prbsl = {prbsO[0] " prbs0[2] .prbsO[10:1]}; 
prbs2 = {prbs1[0] prbs1[2] .prbsl [10:1]}; 
prbs3 ={prbs2[0] prbs2[2] .prbs2[10:1]}; 
prbs4 ={prbs3[0] prbs3[2] .prbs3[10:1]}; 
prbs5 = {prbs4[0J " prbs4[2] ,prbs4[10:1]}; 
prbs6 ={prbs5[01 prbs5[2] .prbs5[10:1]}; 
prbs7 = {prbs6[0] prbs6[2] .prbs6[10:1]}: 
prbs8 = {prbs7[0] prbs7[2] .prbs7[10:1]}; 
prbs9 ={prbs8[0] prbs8[2) .prbs8[10:1]}; 
prbs10 = {prbs9[0] ^ prbs9(2] .prbs9[10:1I}; 
alpha12 = {prbs10[0] prbsl 0[2].prbs10[1 0:1]}; 
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endfunction 
/*FOLDENDS7 
/*F0LDENDS7 
endmodule 

5 

Listing 19 

TFOLDBEGINS 0 0 "Copyright"*/ 

^ Q . 

Copyright (c) Pioneer Digital Design Centre Limited 



NAME: pilloc_rtl.v 
PURPOSE: Pilot location 

CREATED: June 1997 BY: J. Parker (C code) 

MODIFIED: BY: T. Foxcroft 

USED IN PROJECTS: cofdm only. 



25 TFOLDENDS*/ 

•define FFTSIZE 2048 
•define SCATNUM 45 

module pilloc (elk, resync, in_valid, in^data, found_pilots. which_symbol, cpoffset. 
incfreq, 

30 ramaddr , ramln. ramout, wrstrb); 

TFOLDBEGINS 0 0 "i/o"*/ 
input elk, resync, in_valid; 
input [23:0] in_data; 
output found_pilots: 
35 output [1 :0] which_symbol; 

output [10:0] cpoffset; 
output incfreq; 
TFOLDENDS*/ 

TFOLDBEGINS 0 0 "ram i/o"*/ 
output [10:0] ramaddr; 
reg [10:0] ramaddr_; 
output [23:0] ramin; 
input [23:0] ramout; 
output wrstrb; 
reg [10:0] ramaddr; 
reg [23:0] ramin; 
reg wrstrb; 
/*FOLDENDS*/ 
/*FOLDBEGINS 0 0 "vars"*/ 
reg found_pilots; 
reg [1:0] which_symbol; 
reg [1:0] which_symbolcount; 
reg [1:0] which_symbol_; 
reg [10:0] cpoffset; 
reg incfreq; 
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reg found_pilot; 
reg [19:0] v; 
reg [19:0] sum; 
reg [3:0] splocoffset; 
5 wire [10:0] carrier_number; 

reg [10:0] continual_pilot_offset; 

reg resynch; 

reg [3:0] valid; 
10 reg [23:0] fftdata; 

reg [10:0] fftcount; 

reg contcomplete; 

reg firstcontsearch; 

reg finishedsearch; 
15 reg [4:0] firstscatcomplete; 

reg [4:0] faiiedtolock; 

reg [2:0] spmax; 

reg [2:0] spmaxfirst; 

reg [10:0] pilot_offset; 
20 reg [1:0] sploci zero; 

reg [10:0] splocO; 

reg [5:0] sploci; 

reg [10:0] splocmaxcount; 

25 reg [3:0] spoffset; 

reg [19:0] sumscat [1 1 :0]; 

reg [19:0] sumscatmax; 

reg [3:0] sumscatmaxnoO; 

reg [3:0] sumscatmaxnol; 
30 wire [1 9:0] sumscati ; 

wire [19:0] sumscat3; 

wire [19:0] sumscat5; 

reg [1 1 :0] sumscatfirst; 

reg [4:0] fftfinished; 
35 reg ramwritestop; //botch for development purposes 

wire [3:0] modi 2fftcount; 

TFOLDENDSV 

/*FOLDBEGINS 0 0 "continuous pilot location"*/ 
reg [10:0] contloc; 
40 always @(sploc1) 
begin 

case(splocl) 

6'bOOOOOO: contloc = 0; 

6'bOOOOOI: contloc = 48; 
45 6'bOOOOI 0: contloc = 54- 

6'bOOOOII: contloc = 87; 

6'bOOOIOO: contloc = 141 ■ 

6'bOO0 1 0 1 : contloc = 1 56 ■ 

6'b000110: contloc = 192- 
50 6'bOO0 1 1 1 : contloc = 20 1 ; 

6'bOOIOOO: contloc = 255; 

6'b001001: contloc = 279- 

6*b001010: contloc = 282; 

6'b001011: contloc = 333; 
55 6'b001100: contloc = 432- ' 

6'b001101: contloc = 450- 
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6'b001 1 1 0: contloc = 483 
6'b001111: contloc = 525 
6'b010000: contloc = 531 
6'b010001: contloc = 618 
5 6'b0 10010: contloc = 636 
6'b010011: contloc = 714 
6'b010100: contloc = 759 
6'b010101: contloc = 765 
6*b010110: contloc = 780 

10 6'b0101 11: contloc = 804 
6'b0 11000: contloc = 873 
6'b011001: contloc = 888 
6'b011010: contloc = 918 
6'b0 11011: contloc = 939 

1 5 6*b0 1 1 1 00: contloc = 942 
6'b011101: contloc = 969 
6'b01 11 10: contloc = 984 
6'b011111: contloc = 1050 
6'b 100000: contloc = 1 101 

20 6'b1 00001: contloc = 1107 
6'b 100010: contloc = 1110 
6*b100011: contloc = 1137 
6'b 1001 00: contloc =1140 
6'b100101: contloc = 1146 

25 6'b1 001 1 0: contloc = 1206 
6'b100111: contloc = 1269 
6'b1 01000: contloc = 1323 
6'b101001: contloc = 1377 
6'b101010: contloc = 1491 

30 6'b101011: contloc = 1683 
default: contloc = 1704; 
endcase 
end 

TFOLDENDS*/ 

35 

always @(posedge elk) 
begin 

resynch <= resync; 
lf(resynch) 
40 begin 

valid <= 4'bO: 

fftcount <=irbO; 

firstscatcomplete <= 5'bO; 

sum <= 20'b0; 
45 splocO <=irb0; 

sploci <= 6'bO; 

contcomplete <= 1'bO; 

failedtolock <= 5'bO; 

spmax <= 1'bO; 
50 spmaxfirst <= 1'bO; 

ramwritestop <= 1'bO; 

found_pilots <= 1'bO; 

found_pilot <= rbO; 

firstcontsearch <= 1'bO; 
55 finishedsearch <= 1'bO; 

which_symbolcount <= 2'bO; 
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incfreq <= 1'bO; 
end 
else 
begin 

5 incfreq <= !faiiedtolock[1]&&failedtolock(0]&&fftfmishedr41- 

found_pilots <= !found_pilot&&finishedsearch- 

found_pilot <= finishedsearch; 

valid[0] <= in_valid; 

vaiid[1] <= valid[0]; 
10 valid[2] <= vaiid[1]; 

valid[3] <= valid[2]; 

fftdata <= in_data; 

if(valid[0]&&!finishedsearch) 
fftcount <= mcount + 1'bl • 
15 //if(fftfinished[0]) 

// $display("frame". .fftcount); 
//if(incfreq) 

// $display("tweek"); 

20 TFOLDBEGINS 0 4 "locate continual pilots"*/ 

spmax(1] <= spmax[0]; 

spmax[2] <= spmax[1]; 

spmaxfirst[1] <= spmaxfirst[0]; 

spmaxfirst[2] <= spmaxfirsthl; 
25 //if(fftfinished[3]) 

// $display(spoffset, , which_symbol); 

if(fftfinished[3]) 
begin 

30 failedtolock[1] <= failedtolock(0 

faiiedtolocki2j <= fai!edtolock[1 
failedtolockf3] <= failedtolock[2^ 
failedtolock[4] <= failedtolock(3; 

35 if(failedtolock[0]) 
begin 

TFOLDBEGINS 0 2 ""*/ 
if(failedtolock[4]) 

failedtoiock[0] <= 1'bO; 
40 firstscatcomplete <= 5'bO; 

ramwritestop <= 1'bO; 
firstcontsearch <= I'bO* 
TFOLDENDS*/ 
end 

45 else 
begin 

/*FOLDBEGINS 0 4 ""*/ 
fii-stscatcomplete[0] <= I'bl; 
firstcontsearch <= !firstscatcomplete[0]- 
50 ramwntestop <= Iramwritestopj | finishedsearch- 

contcomplete <= ramwritestop; 

U^j^rjshedsearch&&firstscatcomplete[0]&&ramwritestop) 

finishedsearch . <= firstcontsearch? 1 'bO ■ 
(cpoffset==continual_pilot_offset); 
cpoffset <= continual _pilot_offset; 
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failedtolock(0] <= !firstcontsearch&&(cpoffset!=continual_pilot offset)- 
end ~ 

TFOLDENDSV 
end 

5 end 
else 
begin 

firstscatcomplete[1] <= firstscatcomplete[0]&&!contcomplete: 
firstscatconnplete[2] <= firstscatconnplete[1]; 
10 if(firstscatconriplete[0]&&!finishedsearch&&!contcomplete&&!finishedsearc h 

&&(sploc1==44)&&(splocO==splocmaxcount)) 

contcomplete <= Vbl; 

end 

if(found_pilots) 

15 $display(which_synabol..cpoffset„spoffset); 

//$display(sum.,contconriplete,jamwritestop..which_syniboLspoffset ,,splo 
cO,,splocmaxcount.v .fftfinished[3],,finishedsearch); 

//Sdisplay(mcount,,firstscatconnplete[0]„ranriwritestop.,spoffset.,sumsca 
tmaxnol ....finishedsearch. .found pilots,. 
20 // 

//pilot_offset..which_synnbol....cpoffset..faiiedtolock ); 
sploc1zero[0] <= (sploci == 0); 
sploc1zero[1] <= sploci zerofO]; 

25 if{firstscatconriplete[0]&&!finishedsearch&&!contconriplete&&!finish 
begin 

if(sploc1 ==44) 
begin 

30 TFOLDBEGINS 0 4 ""*/ 

//$display(splocO,.splocmaxcount); 

pilot_offset <= splocO + splocoffset; 

which^symbol <= which_symbol_ - which_symbolcount; 

if(splocO==splocmaxcount) 
35 begin 

splocO <= irbO; 
//contcomplete <= rbl; 
which^synnbolcount <= 2'bO; 
end 

40 else 
begin 

splocO <= splocO + 2'b1 1 ; 

which_symbolcount <= which^symbolcount + Vbl ; 
end 

45 if(sploc0==0) 

spmaxfirst[0] <= I'bl; 
sploci <= 6'bO; 
spnnax[0] <= Vbl; 
/*FOLDENDS*/ 

50 end 
else 
begin 

/*FOLDBEGINS0 4""*/ 
sploci <= sploci + rbl; 
55 spmax[0] <= rbO; 

spmaxfirst[0] <= VbO; 
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TFOLDENDSV 
end 
end 

if(firstscatcomplete[2]) 
5 begin 

if(sploc1zero[1]) 

sum <= nnodulus(ramout[23:12],ramout[11:0]); 
else 

sum <= modulus(ramout[23:12].ramout[11:0]) + sum; 
10 end 

/*FOLDENDS*/ 
end 

/*FOLDBEGINS 0 2 "search for largest continous pilot correlation"*/ 
if(spmax[2]) 
15 begin 

if(spmaxfirst(2]) 
begin 

V <= sum; 

continual_pilot_offset <= pilot offset* 
20 end " 

else 
begin 

if(sum>v) 

begin 

25 V <= sum; 

continual_pilot_offset <= pilot_offset; 

end 
end 

30 //5dispiay(sum..continuaLpilot_offset,,contcomplete,,ramwritestop,,wh 
_symbol..spoffset,..sploc0..splocmaxcount„v); 
//$disptay(sum); 

' end 

rPOLDENDSV 
35 end 

assign carrier^number = contloc + splocO + splocoffset* 
rPOLDBEGINS 0 0 "scattered pilot offset mod 3"*/ 
always @(spoffset) 
begin 

40 splocoffset = 2'bO; 

splocmaxcount = 342; 
which_symbol_ = 2'bO; 
case(spoffset) 

4'b0000,4'b001 1 ,4'b01 1 0.4'b1001 : 
45 begin 

splocoffset = 2'bO; 
splocmaxcount = 342; 
end 

4'b0001 ,4'b01 00,4'bO1 1 1 .4'b1 01 0* 
50 begin 

splocoffset = 2*b01; 
splocmaxcount = 339; 
end 

//4*b001 0,4'b01 01 ,4'b1 000,4'b1 01 1 • 
55 default: 
begin 
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splocoffset = 2'b10; 
spiocmaxcount = 339; 
end 

endcase 
5 case(spoffset) 

4'b0000,4'b0001.4*b0010: 
which_symbol_ = 2'bO; 
4'b0011,4'b0100,4'b0101: 
which_symboL = 2'b01; 
10 4'b01 1 0,4*b01 1 1 ,4*b1 000: 

which_symbol_ = 2*b10; 
//4*b1 001 ,4*b1 01 0,4'b1 01 1 : 
default: 

which_symbol_ = 2*b1 1 ; 
15 endcase 
end 

rFOLDENDS7 

TFOLDBEGINS 1 0 "Search for scattered pilots"*/ 
always @(posedge elk) 
20 begin 

if(resynch) 

sumscatfirst <= 12'hfff; 
else 

25 

begin 

if(valid[0]&&!finishedsearch) 
TFOLDBEGINS 1 2 "do the accumulations"*/ 
case(mod 1 2fftcount) 
30 4'hO: 
begin 

sumscat[0] <= (sumscatfirst[0])? modulus(fftdata[23:12],fftdata[1 1:01) : 
sumscat[0] + modulus(fftdata[23:12].mdata[1 1:0]); 
sunriscatfirst[0] <= 1 'bO; 
35 end 
4'h1: 
begin 

sumscat[1] <= (sunnscatfirst[1])? niodulus(fftdata[23:12],fftdata[11:0]) : 
sumscat[1] + modulus(fftdata[23:12],fftdata[1 1:01); 
40 sumscatfirst[1] <= rbO; 

end 

4'h2: 

begin 

sumscat[2] <= (sumscatfirst[2I)? modulus(fftdata[23:12],fftdata[11:0]) : 
45 sumscat(2] + modulus(mdata[23:12].fftdata[1 1:01); 

sumscatfirst[2] <= VbO; 
end 
4*h3: 
begin 

50 sumscat[3] <= (sumscatfirst[3])? modulus(fftdata[23:12].fftdata[1 1 :0]) : 

sumscat[3] + modulus(mdata(23:12],fftdata[1 1:0]); 
sumscatfirst[3] <= rbO; 

end 

4*h4: 

55 begin 
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sumscat[4] <= (sumscatfirst[4])? modulus(mdatar23: 1 2l.mdata[1 1 01) ■ 
sumscat[4J + modulus(fftdata[23:12].mdatari1:0lV i • ■ 

sumscatfirst[4] <= I'bO; 
end 

5 4"h5: 
begin 

sumscat[5] <= (sumscatfirst[5])? modulus(fftdata[23:12].mdatari10]) • 
sumscat[5] + modulus(fftdata[23:12],mdatari10lV 
sumscatfirst[5] <= I'bO; i • j/. 

10 end 
4'h6: 
begin 

sumscatgj <= (sumscatfirst[6])? modulus(mdata[23:12].mdata[1 1:01) • 

sumscat[6] + modulus(ffldata[23:12],mdatari10l)- 
15 sumscatfirst[6] <= I'bO; i • 

end 
4'h7: 
begin 

sumscatm <= (sumscatfirst[7I)? modulus(fftdata[23: 1 2l,mdata[1 1 :0]) : 
20 sumscat[7] + modulus(fftdata[23:12],fftdata[110l)- 

sumscatfirst(7] <= I'bO; i • j/- 

end 

4'h8: 

begin 

25 

sumscatg] <= (sumscatfirst[8])? modulus(fftdata[23:12].mdatari 101) • 
sumscat[8] + modulus(fftdata[23:121.fftdatari101)- i • • 

sumscatfirst[8] <= I'bO; j i • j/. 

end 

30 4'h9: 
begin 

sumscatg] <= (sumscatfirst[9])? modulus(mdatar23: 1 2].mdata[1 1 01) ■ 
sumscat[9] + modulus(fftdata[23:12].mdatari101)- i ■ if ■ 

sumscatfirst[9] <= I'bO; i j/- 

35 end 

4'ha: 

begin 

sumscatjIO] <= (sumscatfirst[10])? moduius(fftdatar23:121,mdatari1:01) • 
sumscat[10] + modulus(mdata[23:121.fftdata[11:0])- i iJ 

40 sumscatfirst[10] <= I'bO; i 

end 

default: 

begin 



45 



sumscat[11] <= (sumscatfirst[11])? modulus(mdata[23:121,fftdatari1:01) • 
sumscat[11] + modulus(mdata[23:12].mdata[11:0]); i J/ • 



sumscatfirst[11] <= I'bO; 
end 



endcase 
/*FOLDENDS*/ 
50 else if(fftfinlshed[0]) 

sumscatfirst <= 12'hflf; 
end 

/•FOLDBEGINS 1 0 "Find offset"*/ 
if(resynch) 
55 fftfinished <= 5'bO; 

else 
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begin 

fftfinished[0] <= 
fftfinished(1] <= 
fftfinishedI2] <= 
fftfinished[3] <= 
fftfinished[4] <= 
end 

if(!ramwritestop) 

begin 

if(fftfinished[0]) 
begin 

sumscat[0] 
sumscat[1] 
sumscat[2] 
sumscat[3] 
sumscat[4] 
sumscat[5] 
sumscat(6] 
sumscat[7] 
sumscat[8] 
sumscat[9] 
sumscat[10] 
sumscat[11] 



vaiid[0]&&!finishedsearch&&(fftcount==2047); 

fftfinished[0]; 

fftfinished[1]; 

fftfinished[2]; 

fftfinished[3]; 



= (sumscat[0] 
= (sumscatfO] 
<= (sumscat(2] 
= (sumscat[2] 
= (sunnscat[4] 
= (sunnscat[4] 
= (sumscat[6] 
= (sunnscat[6] 
= (sumscat[8] 
= (sumscatfSj 



<= 



sumscat[1 
sumscat[1 
sumscat[3 
sumscat[3 
sumscat[5 
sumscat[5 
sumscat[7 
sunnscat[7 
sunnscat[9 
sumscat[9 



)? sumscat[0] 
)?0: 1; 
)? sunnscat[2] 
)? 2 : 3; 
)? sumscat[4] 
)? 4 : 5; 
)? sumscat[6] 
)? 6 : 7; 
)? sumscat(8] 
)? 8 : 9; 



sunnscat[1] 
sumscat[3] 
sumscat[5] 
sumscat[7] 
sumscat[9] 



<= (sumscat[10)>sumscat[11])? sumscat[10] 
<= (sumscat[10]>sumscat[11])? 10 : 11; 



sunnscat[1 1]; 



end 

if(fftfinished[1]) 
begin 

sumscat[0] <= (sumscatfO] > 
sunnscat[1] <= (sunnscat[0] > 
sumscat[2] <= (sunnscat[4] > 
sumscat(3] <= (sumscat[4] > 
sumscat[4] <= (sumscat[8] > 
sumscat[5] <= (sumscatfS] > 
end 

if(fftfinished[2]&&!ramwritestop) 
spoffset <= sumscatmaxnol; 
end 

if(fftfmished[0]) 

begin 
$display(sumscat[0]) 
$dispiay(sumscat[1 ]) 
$display(sumscat(2]) 
$display(sumscat[3]) 
Sdisplay(sumscat[4]) 
$display(sunnscat[5]) 
$display(sumscat[6]) 
$display(sumscat[7]) 
$display(sumscat[8]) 
$display(sumscat[9]); 
$display(sumscat[1 0]); 
$display(sumscat[1 1]); 
SdisplayQ; 
end 



sumscat[2])? 
sumscat[2])? 
sumscat[6])? 
sumscat[6])? 
sumscat[10]) 
sunnscat[10]) 



sumscatfO] : 
sumscat[1] : 
sumscat[4] ; 
sumscat[5] : 
? sumscat[8] 
? sumscat[9] 



sumscat[2]; 
sumscat[3]; 
sumscat{6]; 
sumscat[7]; 
: sumscat[10]; 
: sumscat[11]; 



55 end 
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always @(sumscat[01 or sumscat[1] or sumscat[2J or sumscat[3] or sumscat[4] or 

or sumscati or sumscatS or sumscatS) 
begin 

5 sumscatmax = (sumscat[0] > sumscat[2])? sumscatfO] : sumscatf2]- 

sumscatmaxnoO = (sumscat[0] > sumscat[2I)? sumscati [3:01 : sumscat3[3 01- 
^^sumscatmaxnol = (sumscatmax > sumscat[4])? sumscatmaxnoO : sumscat5[3:0]: 

assign mod12fftcount = mod12(fftcount); 
10 assign sumscati = sumscat[1J 
assign sumscat3 = sumscat[3 
assign sumscatS = sumscat[5 

TFOLDENDSV 
15 TFOLDENDS*/ 

TFOLDBEGINS 0 0 "ram"*/ 
always @(posedge dk) 
ramaddr_ <= ramaddr; 

always @(ramwritestop or valid or finishedsearch or fftcount or carrier number or 
20 ramwritestop or ramaddr_ or fftdata) 
begin 

ramaddr = ramaddr_; 
if(!ramwritestop) 
25 begin 

if(valid(0]&&!finishedsearch) 

^^'sfmcou^uer""*^^^'^^^""^^^^'^^^""*^^ 

fftcount[7],mcount[8].fftcount[9],mcount[1 0]}; 
30 end 

else 

ramaddr = carrier_number; 
ramin = fftdata; 

wrstrb = !(!ramwritestop&&validri]); 

35 end 

/*FOLDENDS*/ 

TFOLDBEGINS 0 0 "modulus approximation function"*/ 
function [11:0] modulus; 
40 input [1 1 :0] i; 
input [11:0] j; 
reg [1 1 :0} modi; 
reg [11:0] modj; 
begin 

45 modi = (i[11]?H:i) + i[11l; 

modj = a[11]?~j:j)+j[11]; 
modulus = modi + modj; 
end 

endf unction 
50 /*FOLDENDS*/ 

/•FOLDBEGINS 0 0 "mod 12"*/ 

function [3:0] modi 2; 

input [10:0] count; 

reg [14:0] onetwelfth; 
55 reg [7:0] modulus12; 

parameter TWELFTH = 12'haab- 
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begin 

onetwelfth = {count[0],count(1],count[2),count[3],count[4],count[5],count [6], 
count[7],count[81,count[9].count[10]} * TWELFTH; 
modulus12 = {onetwelfth[14:9],rb0} + onetwelfth[14:9] + 4'h8; //*12 
mod12 = moclulus12[7:41; 
end 

rFOLDENDS*/ 

endfunction 

endmodule 

Listing 20 

// Sccsid: @(#)bch_decode.v 1.2 8/22/97 
rPOLDBEGINS 0 0 "copyright"*/ 

II . — * * **- — ********** ** 

// Copyright (c) 1997 Pioneer Digital Design Centre Limited 
// 

//NAME: BCH_rtl.v 
// 

// PURPOSE: BCH decoder for TPS pilots. Flags up to two error 

// positions using search technique. 

// 

— . 

/•FOLDENDS*/ 

•define DATAO_SIZE 7'b01 10100 
'define DATA1_SI2E 7'b0110111 

module bch_decode (elk, resync, in_data, in_valid, in_finalwrite, out_valid, Out_data); 
TFOLDBEGINS 0 0 "l/Os"*/ 
input elk, resync; 

input in_data, in_valid, in_finalwrite; 

output out_valid; 

output out_data; 

reg out_data; 

reg out_valid; 

/*FOLDENDS*/ 

/*FOLDBEGlNS 0 0 "variables"*/ 

reg resynch; 

reg valid; 

reg finalwrite; 

reg indata; 

reg [6:0] SO; 

reg [6:0] SI; 

reg [6:0] S2; 

reg [6:0] count; 

reg search 1 error, found2error, oneerror. twoerror; 
wire twoerror_; 
reg noerrors; 

reg delayO. delayl, delay2; 

reg [6:0] GsO; 

reg [6:0] Gsl; 

reg [6:0] Gs2; 

/*FOLDENDS*/ 

always @(posedge elk) 

begin 
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TFOLDBEGINS 0 2 "read in data and calculate syndromes"*/ 
resynch <= resync; 
if(resynch) 
begin 

5 valid <= rbO; 

50 <= 7'bO: 

51 <= 7'bO; 

52 <= 7'bO; 
end 

1 0 else 
begin 
valid <= in_valid; 
if(delay1 &&twoerror_) 
begin 

1 5 rFOLDBEGINS 0 4 "update after one in two errors found"*/ 

50 <= SO'^GsO; 

51 <= SI'^Gsl; 

52 <= S2'^Gs2; 
/•FOLDENDS*/ 

20 end 

else if(valid) 
begin 

50 <= indata MULTA1 (SO)- 

51 <= indata " MULTA2(S1); 
25 S2 <= indata MULTA3(S2); 

end 
end 

indata <=-in_data; 
/*FOLDENDS*/ 

30 /*FOLDBEGINS 0 2 "out_valid control"*/ 
if(resynch) 

begin 
delayO <= rbO; 
35 delayl <= rbO; 
delay2 <= I'bO; 
out_valid <= rbO; 
finalwrite <= 1'bO; 
end 

40 else 
begin 

finalwrite <= in_finalwrite; 
if(valid&&finalwrite) 
delayO <= 1'b1; 
45 else 

if(count == 'DATA1_SIZE-4) 
delayO <= 1'bO; 
delayl <= delayO; 
delay2 <= delayl; 
50 out_valid <= delay2; 
end 

TFOLDENDS*/ 

C£°.'-°f ° 2 "en-or search algorithm"*/ 

if(delayO&&!delay1) 
55 begin 

noerrors <= (SO == 7'bO); 
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searchlerror <= (GFULL(SO.SI) == S2); 
found2error <= rbO; 
twoerror <= VbO; 
count <= 7'bO; 
5 GsO <= 7'h50; 
Gs1 <= 7'h20; 
Gs2 <= 7'h3d; 
end 

6iSB 

10 if(delay1) 
begin 

oneerror <= ((SO'^GsO) == 7'b0)&&search1 error; 
twoerror <= twoerror_; 
if(twoerror_) 
15 begin 

search 1 error <= 1 'b 1 ; 
found2error <= 1'bl; 
end 

GsO <= DIVI(GsO); 
20 Gs1 <= DIV2(Gs1); 

Gs2 <= DIV3(Gs2); 
count <= count + 1'b1; 
end 

out_data <= (twoerrorj |oneerror)&&!noerrors; 
25 TFOLDENDS*/ 
end 

assign twoerror_ = ( GFULL((SO'^GsO).(S1'^Gs1)) == 
(S2'^Gs2))&&!found2error&&!twoerror; 
TFOLDBEGINS 0 0 "functions"*/ 
30 rPOLDBEGINS 0 0 "GFULL function'-/ 

function [6:0] GFULL; 
input [6:0] X; 
input [6:0] Y; 
35 reg [6:0] AO. A1 . A2. A3. A4. A5. A6; 
integer i; 
begin 

AO = X; 

A1 = {A0[5].A0[4].A0[3],AO[2] A0[6],A0[1],A0[0],A0[6]}; 
40 A2 = {A1[5].A1[4].A1[3].A1[2] A1[6].A1[1].A1[0],A1[6]}; 

A3 = {A2[5].A2[4].A2[3].A2[2] A2(6].A2[1].A2[0].A2[6]}; 
A4 = {A3[5],A3[4].A3[3].A3[2] A3(6].A3[1].A3(0],A3[6]}; 
A5 = {A4[5],A4[4].A4[3],A4[2] A4[6],A4[1],A4[0].A4[6]}; 
A6 = {A5[5].A5[4].A5[3].A5[2] A5[6],A5[1],A5[0].A5[61}; 

45 

for(i=:0;i<7;i=i+1) 
begin 
A0[i] = AO[i] && Y[0]: 
A1[i] = A1[i] && Y(1]; 
50 A2[i] = A2[i] && Y[2]; 

A3[i] = A3[i] && Y[3]; 
A4[i] = A4[i] && Y[4]: 
A5[i] = A5[i] && Y[5]; 
A6[i] = A6[i] && Y[6]; 
55 end 

GFULL = AO A1 A2 A3 A4 A5 A6; 
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end 

endfunction 
/•FOLDENDS*/ 

/*FOLDBEGINS 0 0 "MULTA1 function"*/ 
5 function [6:0] MULTA1- 
input [6:0] X; 
begin 

MULTA1 = {X[5].X[4],X[3].X(2] X[6].X[1].X[0],X[6]}; 
end 

10 endfunction 

rPOLDENDS*/ 

rPOLDBEGINS 0 0 "MULTA2 function"*/ 
function [6:0] MULTA2; 
input [6:0] X; 
15 begin 

MULTA2 = {X[4].X[3].X[2]'^X[6],X[1]'^X[5].X[0].X[6].X[5]}; 
end 

endfunction 

/*FOLDENDS*/ 

20 /*FOLDBEGINS 0 0 "MULTA3 function"*/ 

function [6:0] MULTA3; 

input [6:0] X; 

begin 

25 end^"^^^ " {X[3].X[2]'^X[6].X[1 ]'^X[5].X[0]'^X[4].X[6].X[5].X[4]}; 

endfunction 
/*FOLDENDS*/ 

/•FOLDBEGINS 0 0 "DIV1 function"*/ 
function [6:0] DIV1; 
30 input [6:0] X; 
begin 

DIV1 = {X[0].X[6].X[5].X[4],X[3]'^X[0].X[2],X[1]}; 
end 

endfunction 
35 /*FOLDENDS*/ 

/•FOLDBEGINS 0 0 "DIV2 function"*/ 
function [6:0] DIV2; 
input [6:0] X; 
begin 

^0 end^ " {X[1].X[0].X[6],X[5].X[4]^X[1].X[3]'^X[0].X(2]}: 

endfunction 
/•FOLDENDS*/ 

/•FOLDBEGINS 0 0 "DIV3 function'-/ 
45 function [6:0] DIV3- 
input [6:0] X; 
begin 

end^ = (X[2].X[1].X[0],X[6].X[5]-X[2].X[4]-X[1],X[3]'^X[0]}: 

50 endfunction 

/•FOLDENDS*/ 
/•FOLDENDS*/ 
/•FOLDBEGINS 0 0 ""*/ 
//always @(posedge elk) 

^alwLT^&^dg^^ ■..): 
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// $display(resynch.,in_valid..in_data..out_valid,,SO.,S1,,.,count..,delayO,.del 
ay1,,delay2..,. 

// ..„delay2..noerrors.,oneerror,.twoerror..out_data.,out_valid); 
//always @(posedge elk) 

//$display(in_valid,.in_data,,.,out_valid,.out_data,,.S0„S1„S2,„); 
//always @(posedge elk) 

// $display(in_vaiid„in_data,,.,out_valid,.out data,.,S0..S1 ,,S2...); 

/*FOLDENDS*/ 

endmodule 

Listing 21 



. // Sccsid: @(#)tps.v 1 .2 9/1 5/97 

/•FOLDBEGINS 0 0 "eopyright"*/ 

15 //*" • • — **- * **** 

// Copyright (c) 1997 Pioneer Digital Design Centre Limited 
// 

//NAME: tps_rtl.v 
// 

20 // PURPOSE: Demodulates TPS pilots using DPSK. Finds sync bits. 
// Corrects up to two errors using BCH. 
// (DPSK produces two errors for each transmission error) 
// HISTORY: 

// 15/9/97 PK Added scan lO ports, te, tdin .tdout 
25 // 

II*.. * 

/•FOLDENDS*/ 

'define SYNCSEQO 16'b01 1101 11 10101 100 
'define SYNCSEQ1 16'b100010000101001 1 
30 module tps (resync. elk. tps_valid, tps_pilot, tps_sync, tps_data, upsel, upaddr, 
uprstr. lupdata. 

te, tdin, tdout); 
/*FOLDBEGINS 0 0 "i/os"*/ 

input resync, elk, tps_valid. tps_pilot, upsel, uprstr, te, tdin; 
35 input [1:0] upaddr; 

inout [7:0] lupdata; 

output tps_sync. tdout; 

output [30:0] tps_data; 

/•FOLDENDS*/ 
40 /*FOLDBEGINS 0 0 "registers"*/ 

reg resyneh; 

reg [1:0] foundsync; 

reg [66:0] tpsreg; 

reg [15:0] syncreg; 
45 reg [1 :0] tpsvaiid; 

reg [1:0] pilot; 

reg tps_sync; 

reg [7:0] beh_count; 

reg [2:0] beh_go; 
50 reg bch_finalwrite; 

wire bch_data; 

wire bch_valid; 

wire beh_error; 

integer i; 

55 wire upselO; 

wire upsel 1 ; 
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wire upsel2: 
wire upsel3; 
/*FOLDENDS*/ 

5 always @(posedge elk) 
begin 

rFOLDBEGINS 0 2 "Synchronise to TPS"*/ 
resynch <= resync; 

if(tpsvalld[0]&&!(foundsynctO]| |foundsync[1]| |tps_sync)) 
10 begin 

tpsreg[66] <= pilottlJ'^pilottOI; 
for(i=0;i<66;i=si+1) 

tpsreg[i] <=tpsreg[i+1]: 

15 end 
else 

if(bch_valid&&bch_error) 
tpsreg[bch_count] <= !tpsreg[bch count]- 
if(tpsvalid[0]&&(foundsync(0] | Ifoundsyncfl])) 
20 begin 

syncreg[15] <= pilottlj'^pilotp]; 
for(i=0;i<15;i=i+1) 

syncreg[i] <= syncreg[i+1]; 

end 

25 

pilot[0] <= tps_pi!dt; 
pilot[1] <=pilot[0]; 
if( resynch) 
begin 

30 tpsvalid <= 2*b0; 

tps_sync <= rbO; 
bch_go <= 3'bO; 
bch_finaiwrite <= I'bO; 
bch_count <= 8'bO: 
35 foundsync <= 2'bO: 

end 
else 
begin 

tpsvalid[0] <= tps_valid; 
40 tpsvalid[1] <= tpsvalid[01: 

bch_go[1] <=bch _go[0]; 
bch_go[2] <=bch_go[1]; 

bch_finalwrite <= (bch_count == 65)&&bch qor21- 
if((bch_count == 52)&&bch_valid) 
45 tps_sync <= 1'bl; 

/*FOLDBEGINS 0 2 "counter"-/ 
if(bch_count == 66) 
bch_count <= 8'bO; 

else if(tpsvalid[1]&&!(foundsync[0] 1 1 foundsync[11)) 
50 begin / i j// 

if(tpsreg[15:0] == *SYNCSEQ1) 
bch_count <= 8'hfe; 11-2 
if(tpsreg[15:0J == *SYNCSEQ0) 
bch_count <= 8'hfe; 11-2 
55 end 

else if(tpsvalid[1]&&(bch_count==15)&&(foundsync[0] 1 1 foundsync[1])) 
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bch^count <= 8*hfe; //-2 

else 

begin 

if(bch_valid || bch_go[0] || ((foundsync[0] | | foundsync[1])&&tpsvalid[0])) 
5 bch_count <= bch^count + Vbl ; 

end 

TFOLDENDSV 
/*FOLDBEGINS 0 2 "BCH + second SYNC reg contror/ 
if(bch_count == 66) 
10 begin 

bch_go <= 3*bO; 
end 

else if(tpsvalid[1]) 
15 begin 

if(foundsync[0] j| foundsync[1]) 
begin 

if(bch_count==15) 

begin 

20 if(((syncreg[15:0] == 'SYNCSEQ0)&&foundsync[1])| | ((syncreg[15:0] 

== 'SYNCSEQ1)&&foundsync[0]) ) 
bch_go[01 <= rbl; 
else 

foundsync <= 2'bO; 
25 end 
end 
else 
begin 

if(tpsreg[15:0] == 'SYNCSEQ1) 
30 foundsync(1] <= I'bl; 

if(tpsreg[15:0] == ^SYNCSEQO) 

foundsync[0] <= rb1; 
end 
end 

35 rFOLDENDSV 
end 

rPOLDENDSV 
end 

assign bch_data = tpsreg[bch_count]; 
40 rPOLDBEGINS 0 0 ""*/ 
//always @(posedge elk) 
//begin 

//$write(tps_valid..tps_sync„tps_pilot,,tpsvalid[1],, pilot,, ...» 

// bch_finaiwrite bch_go[2].,bch_data..bch_valid.,bch_error.,bch_count.,tps 

45 _sync ); 

// Sdispiayb(tpsreg„syncreg,. foundsync); 
//end 

/*FOLDENDSV 

/*FOLDBEGINS 0 0 "micro access"*/ 
50 assign upseiO = upsel&&uprstr&&!upaddr[1]&&!upaddr[0]: 

assign upsell = upsel&&uprstr&&!upaddr[1]&& upaddrfO]; 

assign upseI2 = upsel&&uprstr&& upaddr[1]&&!upaddr[0]; 

assign upsel3 = upsel&&uprstr&& upaddr[1]&& upaddrfoj; 

assign lupdata = upselO? {rb0,tps_data[30:24]} : 8'bz. 
55 lupdata = upsell? tps_data[23:16] : S'bz. 

lupdata = upsel2? tps_data[15:8] : 8'bz, 
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lupdata = upsel3? tps datar7:0] • 8'bz- 
TFOLDENDS*/ " i • ° 

assign tps_data = tpsreg[52:22]: 

bch decode bch1 (.clk(clk), .resync(resync), .in valid(bch gor2]) 
.in_finalwnte(bch_finalwrite). .in_data(bch_data); -« ^ j/. 

.out_valid(bch_valid), .out data(bch error)): 

endmodule ~ 



//SccsID = %W% %G% 



15 yQLDBEGINS 0 0 "Copyright (c) 1997 Pion eer Digital Design Centre Limited ..." 
Copyright (c) 1997 Pioneer Digital Design Centre Limited 

NAME: sydint_rtl.v 
20 PURPOSE: <a one line description> 

CREATED: Thu 14 Aug 1997 BY: Paul(Paul McCloy) 

MODIFICATION HISTORY: 
25 1 5/9/97 PK Increased width to 1 3 to allow for bad_carrier flag 

//FOLDENDS *^ 

30 //FOLDBEGINS 0 0 "module symdint ... <- top level" 
////////////////////////////////////////////////jy/////////////////////// 
module symdint 
//FOLDBEGINS 0 0 "pins " 
{ 

35 out_data, 
valid, 

d_symbol, 

validjn. 
40 demap_data, 
odd_symbol. 
symbol. 
carrierO, 
constellation, 

45 

, //FOLDBEGINS 0 3 "ram pins ..." 
ram_a, 
ram_di, 
ram_do, 
50 ram_wreq, 

//FOLDENDS 

//FOLDBEGINS 0 3 "scan pins " 
tdin, 
55 tdout. 
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te. 

//FOLDENDS 

nrst, 
5 elk 

): 

//FOLDENDS 

parameter WIDTH = 13; // Modified by PK 15/9/97; 12->13 
10 parameter ADDR_WIDTH = 11; 

//FOLDBEGINS 0 2 "outputs ..." 
output tdout; 

15 output valid; 

output [17:0]out_data; 
output d_symbol; 

output [ADDR_WIDTH-1:0]ram_a; 
20 output [WIDTH-1:0]ram_di; 
output ram_wreq; 
//FOLDENDS 
//FOLDBEGINS 0 2 "inputs ..." 

25 input validjn; 

input [WlDTH-1:0]demap_data; 

input odd_symbol; 

input symbol; 

input carrierO; 
30 input [WIDTH-1:0]ram_do; 

input [1 lOJconstellation; 

input tdin. te; 

35 input nrst. elk; 

//FOLDENDS 
//FOLDBEGINS 0 2 "regs / wires ..." 

//FOLDBEGINS 0 0 "inputs regs ..." 

40 

reg valid_in_reg; 

reg [WIDTH-1:0]demap_data_reg; 
reg odd_symbol_reg; 
reg symbol_reg; 
45 reg [Wl DTH- 1 :0]ram_do_reg ; 
reg [1:0]constellation_reg; 
//FOLDENDS 

//FOLDBEGINS 0 0 "output regs ..." 

50 reg valid; 

reg [17:01out_data; 
reg d_symbol; 

reg [ADDR_WIDTH-1:0]ram_a; 

55 

reg [WIDTH-1:0]ram_di; 
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reg ram_wreq; 
//FOLDENDS 



//FOLDBEGINS 0 0 "instate_reg ... " 

parameter I NSTATE_WAIT SYMBOL = 2'dO- 
parameter INSTATE_WAIT_VALID = 2'd1 • ' 
parameter INSTATE_WRITE = 2'd2- 
parameter INSTATE_WRITE_RAM ='2'd3; 

reg [1:0]instate reg; 
//FOLDENDS ~ 

//FOLDBEGINS 0 0 "outstate_reg ..." 

15 parameter OUTSTATE_WAIT WRITEFINISHED = 3'dO- 
parameter OUTSTATE_WAIT0 =3'd1- 
parameter 0UTSTATE_WAIT1 = 3'd2' 
parameter OUTSTATE_READRAM = 3'd3- 
parameter OUTSTATE_WAIT2 = 3'd4- 
parameter OUTSTATE_OUTPUTDATA " = 3'd5- 
parameter OUTSTATE_WAIT3 = 3'd6- 



reg [2:0]outstate reg; 
//FOLDENDS ~ 

reg [ADDR_WIDTH-1:01read addr req- 

reg (WIDTH-1:0]data_reg; " ~ 

reg next_read_reg. next_wrlte reg- 

reg frist_data_reg; ~ 

reg odd_read_reg, odd_write_reg; 

reg sym_rst_read_reg, sym_rst_write_reg; 



reg [17:0] demapped; 
reg [3:0] iminus; 
35 reg [3:0] qminus; 
reg [8:0] outi; 
reg [8:0] outq; 
reg [5:0] demap; 

40 



//FOLDBEGINS 0 0 "wires " 

wire[AppR_WIDTH-1:0]address read, address write- 
wire finished_read, finished write^ 
wire valid_read. write_valid; 

wire [5:0]ini. inq; 
//FOLDENDS 
//FOLDENDS 

50 ag #(ADDR_WIDTH) r 

//FOLDBEGINS 0 2 "pins ..." 

.address(address_read), 

55 .finished(finished_read). 
. next(next_read_reg ) , 
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.random(odd_read_reg). 

.sym_rst(sym_rst_read_reg). 

.nrst(nrst). 

.clk(clk) 

); 

//FOLDENDS 

ag #(ADDR.WIDTH) w 
//FOLDBEGINS 0 2 "pins ..." 

.add ress(address_write) , 

.finished(finished_write). 

. next(next_write_reg) . 

.random("'Odd_write_reg). 

. sy m_rst(sy m_rst_write_reg ) . 

.nrst(nrst). 

.clk(clk) 

); 

//FOLDENDS 

//FOLDBEGINS 0 2 "latch inputs ..." 

always @(posedge elk) 

begin 

valid Jn_reg <= validjn; 
demap_data_reg <= demap^data; 
odd_symbol_reg <= odd_symbol; 
symbot_reg <= symbol; 
ram_do_reg <= ram_do; 
constellation_reg <= constellation; 
end 

//FOLDENDS 

always @(posedge elk) 
begin 
if( --nrst ) 

//FOLDBEGINS 0 4 "reset ..." 
begin 

instate reg <= INSTATE_WAIT_SYMBOL; 
outstate_reg <= OUTSTATE_WAIT_WRITEFINISHED; 
next_read_reg <= 0; 
end 

//FOLDENDS 

else 

begin 

//FOLDBEGINS 0 4 "input state machine ..." 
//$write("DB(%Od %m): instate_reg=%Od fw=%b\n". 
// $time, instate^reg, finished_write); 
case (instate_reg) 

INSTATE_WAIT_SYMBOL: begin 

sym_rst_write_reg <= 1 ; 

next_write_reg <= 0; 

ram_wreq <= 0; 

if( symbol^reg ) 
begin 
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//$write("DB(%Od %m): GOT = %x (NEW SYMBOL)\n" $time 

aemap_data_reg); 
$writerDB(%Od %m): START WRITE\n". $time)- 
odd_wnte_reg <= odd_symbol reg- 
5 data_reg <= demap_data reg- 

instate_reg <= INSTATE WRITE" 
end 
end 

INSTATE_WAiT_VALID: begin 
10 ram_wreq <= 0; 

next_write_reg <= 0; 
if( finished_write ) 
begin 

$write("DB(%Od %m): END(1) WRITE\n". $time); 
^5 instate_reg <= INSTATE_WAIT SYMBOL- 

end ' 
else 
begin 

if( valid_in_reg ) 
20 begin 

data_reg <= demap_data_reg- 

instate_reg <= INSTATE WRITE" 
end 
end 

25 end 

INSTATE_WRITE: begin 
sym_rst_write_reg <= 0; 
next_write_reg <= 1 ; 
ram_a <= address_write; 

date reg)?^^°''°°^ = $time. address_write. 

ram_di <= data_reg; 
ram_wreq <= 1 ; 
if( finished_wrlte ) 
35 begin 

$write("DB(%0d %m): END(2) WRITE\n" Stime)" 
instate_reg <= INSTATE WAIT SYMBOL" 
ram_wreq <= 0; ~ 
end 

40 else 

instate_reg <- INSTATE WAIT VALID 
end ~ - 

endcase 

//FOLDENDS 
45 //FOLDBEGINS 0 4 "output state machine " 

//$writeCDB(%Od %m): outstate_reg=%Od nr:%b r:%b\n" 
casi (^tstatf fig^^^^^ next_read_reg. odd.symboLreg);' 

OUTSTATE_WAIT_WRITEFINISHED: begin 
50 sym_rst_read_reg <= 1; ^ 

frist_data_reg <= 1; 
valid <= 0; 

if( finished_write ) 
55 begin 

odd_read_reg <= odd_write_reg; 
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outstate^reg <= OUTSTATE_WAIT0; 

$writerDB(%Od %m): START READ\n", Stime); 

//$writerDB(%Od %m): Read (NEW SYMBOL)\n". $time. 

address_read); 
end 
end 

OUTSTATE_WAIT0: begin 
sym_rst_read_reg <= 0; 
outstate_reg <= OUTSTATE_WAIT1; 
end 

OUTSTATE_WAIT1: begin 

outstate_reg <= OUTSTATE_READRAM; 
end 

OUTSTATE.READRAM: begin 

//$write("DB(%Od %m): Read [%x]\n'\ Stime, address_read); 

ram_a <= address_read; 

ram_wreq <= 0; 

next_read_reg <= 1 ; 

outstate^reg <= OUTSTATE_WAIT2; 

end 

OUTSTATE_WAIT2: begin 
next_read_reg <= 0; 

outstate^reg <= OUTSTATE_OUTPUTDATA; 

end 

OUTSTATE.OUTPUTDATA: begin 

out^data <= {outi[8:6]. outq[8:6]. outi[5:3]. 
outq[5:3], outi[2:01. outq[2:01}; 
valid <= 1; 

d_symbol <= frist_data_reg; 

frist_data_reg <= 0; 

outstate_reg <= OUTSTATE_WAIT3; 

end 

OUTSTATE_WAIT3: begin 
valid <= 0; 
if( flnished_read ) 
begin 

outstate_reg <= OUTSTATE_WAIT_WRITEFINISHED; 

$write("DB(%Od %m): END READ\n'\ Stime); 
end 
else 

outstate_reg <= OUTSTATE_WAIT0; 
end 

endcase 
//FOLDENDS 
end 
end 

always @(constellation_reg or ini or inq) 
//FOLDBEGINS 0 2 "demapper ..." 
begin 

//FOLDBEGINS 0 2 "coarse demapping" 

Iminus = {ini[5;3]. 1 'bO} -2'd3; 
qminus = {inq[5:3].1'b0} -2'd3; 
if(constellatlon_reg==2'b01 ) 
begin 
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demap ={2'b0, 

iminus[2J, 

qminus[2], 

!(iminus[2rimlnus[1]). 
!(qminus(2]'^qminusril) 
}: 

//$writeb(demap„); 
//$display(iminus,.inif5:3]); 

else if(constellation_reg==2'b10) 
begin 

J— . Jrninus = {ini[5:3], 1 'bO} -3'd7- 
qmlnus = {inq[5:3].rb0} -3'd7; 
demap - { iminus[3], 

qminus(3], 

!(imlnus[3^iminus[2]). 
!(qminus[3]'^qminus[2]). 
(iminus(2riminus(1]), 
(qminus[2]'^qminus[1 ]) 

end 
else 

demap = 6'bO; 

//FOLDENDS 

if(constellation_reg==2'b01 ) 
begin 

//FOLDBEGINS 0 4 "16QAM" 

if(!iminus[1]&&iminus[0]) 
begin 

outi[8:6J = 3'bO; 

outi[5:3] = demap[31? 3'b111 : 3'bO- 
^^o"t'[2:0} = iminus[2]? ini[2:0] : -initirO]; 

else 
begin 

outi[8:6] = 3'bO; 

outi[5:3] = -ini[2:0]; 

outi[2:0] = 3*b111; 
end 

if(!qminus[1]&&qminus[0l) 
begin 

outq[8:6] = 3'bO; 

outq[5:3] = demap[21? 3'b111 : 3'bO- 
^^outq[2:0] = qminus[2]? inq[2:0] : ~inq[2:0]; 

else 
begin 

outq[8:6J = 3'bO; 

outq[5:3J = Hnq[2:0]; 
outq[2:0] = 3'b111; 
end 

//FOLDENDS 
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end 

else if(constellation_reg==2'b10) 
begin 

//FOLDBEGINS 0 4 "64QAM" 
if(!iminus[1]) 
begin 



outi[8:6 
outi[5:3 
outi[2:0 
10 end 



= demap[5]? 3'b111 : 3'bO; 
= demap(3]? 3*b111 : 3*b0; 
= iminus[2]? Hni[2:0] : ini(2:01; 



else if(!iminus[2]) 
begin 

outi[8:6] = demap[5]? 3*b1 1 1 : 3'bO; 
outi[5:3] = iminus[3]? ini[2:0] : Hni[2:0]; 
1 5 outi[2:0] = dennap[1 ]? 3'b1 11 : 3'bO; 

end 
else 
begin 

outi[8:5] = '-ini[2:01; 
20 outi[5;3] = demap[3]? 3'b1 1 1 : 3'bO; 

outi[2:0] = demap[1]? 3'b1 1 1 : 3*b0; 
end 

if(!qminus[1]) 
begin 

25 outq[8:6] = demap[4]? 3*b1 1 1 : 3'bO; 

outq[5;3] = demap[21? 3'b111 : 3'bO; 
outq[2:0] = qminus[21? -inq[2:0] : inq[2:0]; 
end 

else if(!qminus[2]) 
30 begin 

outq[8:6] = demap[4]? 3'b111 : 3'bO; 

outq[5:3] = qminus(3]? inq[2:0] : --inq[2:0]; 

outq[2:0] = demap[0]? 3*b1 1 1 : 3*b0; 
end 

35 else 
begin 

outq[8:6] = -inq[2:0]; 
outq[5:3] = dennap[2]? 3'b111 : 3'bO; 
outq[2:0] = demap[0]? 3'b1 1 1 : 3'bO; 
40 end 

//FOLDENDS 
end 
else 
begin 

45 //FOLDBEGINS 0 4 "QPSK" 

out! = {6*b0,-ini[2:0]}; 
outq = {6'b0,-inq[2:0]}; 
//FOLDENDS 
end 



end 

//FOLDENDS 



assign ini = ram_do^reg[1 1:6]; 
55 assign inq = ram_do_reg[5:0]; 
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endmodule 
//FOLDENDS 

//FOLDBEGINS 0 0 "module ag (address generation) " 
5 //////////////////////////////////////////////////////////////////////// 
module ag 

//FOLDBEGINS 0 0 "pins ..." 

address, 
10 finished. 

next, 

random, 

sym_rst. 

15 

nrst, 
elk 

); 

//FOLDENDS 

20. 

parameter ADDR_WIDTH = 12; 

//FOLDBEGINS 0 2 "outputs ..." 
output [ADDR_WIDTH-1:0] address; 
25 output finished; 
//FOLDENDS 

//FOLDBEGINS 0 2 "inputs ..." 
input next; 
input random; 
30 input sym_rst; 
input nrst, elk; 
//FOLDENDS 

//FOLDBEGINS 0 2 "regs ..." 
35 integer i; 

reg finished; 
reg [9:0] prsr_reg; 
reg [11:0] count reg; 
40 ~ 
wire address valid; 
//FOLDENDS 

always @(posedge elk) 
45 begin 

if( -nrst ) 
begin 

eount_reg <= 0; 

50 prsr_reg <= 10'dO; 

end 
else 
begin 

if(sym_rst) 
55 begin 

finished <= 0; 
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count_reg <= 0; 
end 
else 

if( next I (!address_valicl & random) ) 
begin 

//$write("DB(%Od %m): Next(r:%d)\n'\ $tinne, random); 

if( random ) 
//FOLDBEGINS 0 8 "do the random stuff ..." 
begin 

if( !address_valid ) 
begin 

//FOLDBEGINS 0 4 "drive the prsr ..." 
if( count_reg == 1 rdO ) 

prsr_reg <= 10'dO; 

else 

if( count_reg == 11 'd1 ) 
prsr_reg <= 10'dl; 
else 
begin 

for(i=0;i<9;i=i+1) 
prsr_reg[i] <= prsr_reg[i+11; 
prsr_reg[9] <= prsr_reg[0] ^ prsr_reg[3]; 
end 



//FOLDENDS 

count_reg <= count_reg + 1 ; 

//$writerDB(%Od %m): count=%Od Rand(Retry)\n", $time, 

count_reg); 
end 
else 
begin 

if( count_reg == 1 rd2047 ) 
begin 

//$writerDB(%Od %m): FINISHED Rand\n". $time); 

finished <= 1 : 

count_reg <= 0; 

prsr_reg <= 10'dO; 
end 
else 
begin 

//FOLDBEGINS 0 6 "drive the prsr ..." 
if( count_reg == ll'dO ) 

prsr_reg <= 1 0'dO; 

else 

if( count_reg == IVdl ) 
prsr_reg <= 10'dl; 

else 
begin 

for{i=0;i<9;i=i+1) 
prsr_reg[i] <= prsr_reg[i+1l; 
prsr_reg[9] <= prsr_reg(01 prsr_reg[3]; 
end 

//FOLDENDS 

count_reg <= count_reg + 1; 
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Sed '^LT^"^ 5time. count_reg): 

end 
end 

5 end 

//FOLDENDS 
else 

//FOLDBEGINS 0 8 "do the sequential stuff " 
begin 

10 if( count_reg != ird1511 ) 

begin 

'^TI^T'^X:'!"'--'''''' $,ime, ooun,_reg,; 

finished <= 0* 
15 end 

else 
begin 



20 



count_reg <= 0; 
end 
end 

//FOLDENDS 

end 

25 end 
end 



30 



Sed"iL^^°^**°'' '''N'SHED Sequ\n". Stime); 



//FOLDBEGINS 0 2 "assign address " 
assign address = (random) ? ({count_reg[OJ. //10 

prsr_reg[2]. //9 

prsr_reg[5j. // 8 

prsr_reg[8]. //7 

prsr_reg[3]. // 6 

35 prer_reg[7]. // 5 

prsr_reg[01, // 4 

prsr_reg{1], //3 

prsr_reg[4]. // 2 

prsr_regt6]. //I 

40 Prsr_reg[9]}): //O 

count_reg: 
//FOLDENDS 

assign address_valid = (address < ird1512V 
endmodule 
45 //FOLDENDS 

//SccsID: •'@(#)bitdeint.v 1 .4 9/14/97"'^*'"^ 
50 Design Centre Limited- 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 
NAME: bitdeint_rtl.v 
55 PURPOSE: bit deinterleaver 
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CREATED: Wed 23 Jul 1997 BY: Paul(Paul McCloy) 

MODIFICATION HISTORY: 

5 **** **************** * 1 

//FOLDENDS 

module bitdeint 
//FOLDBEGINS 0 2 "pins ..."^ 
10 ( 

i_data, 
q_data, 
discardj, 
discard_q. 

15 

valid. // output 
//FOLDBEGINS 0 2 'VamO pins ..." 

20 ramO^a, 

ramO_di, 

ramO^do. 

rannO_wreq. 

rannO_ce. 
25 //FOLDENDS 

//FOLDBEGINS 0 2 "rami pins ..." 

ram1_a, 
ram1_di. 
30 ram1_do, 

ram1_wreq» 
raml^ce. 
//FOLDENDS 
//FOLDBEGINS 0 2 "ram2 pins ..." 

35 

ram2_a, 
ram2_di. 
ram2_do, 
ram2_wreq, 
40 ram2_ce. 

//FOLDENDS 

bad^carrier. 
validjn, 
45 datajn. 

symbol, 

constellation, // constellation 
alpha. // does not do anything yet 

50 //FOLDBEGINS 0 2 "scan pins ..." 
tdin. 
tdout. 
te. 

//FOLDENDS 

55 

nrst. 
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10 



15 



20 



25 



30 



35 



40 



45 



50 



55 



); 

//FOLDENDS 

parameter SBW = 3; // soft bit width 

//FOLDBEGINS 0 2 "outputs " 
//FOLDBEGINS 0 0 "ramO outputs " 
output [6:0]ram0_a; 
output [((SBW+1)«l)-l:0]ram0 di; 
output ram0_ce; ~ 
output ramO wreq; 
//FOLDENDS 

//FOLDBEGINS 0 0 "rami outputs " 
output [6:0]ram1_a; 

output [((SBW+1)«l)-l:0]ram1 di; 
output ram1_ce; ~ 
output rami wreq; 
//FOLDENDS 

//FOLDBEGINS 0 0 "ram2 outputs " 
output [6;0]ram2_a; 

output [((SBW+1)«l)-i:0]ram2 di; 
output ram2_ce; ~ 
output ram2_wreq; 
//FOLDENDS 

output tdout; 

output [SBW-1;0]i_data; 
output [SBW-1 :0]q_data; 
output discardj; 
output discard_q; 

output valid; 

//FOLDENDS 

//FOLDBEGINS 0 2 "inputs ..." 

input [((SBW+1)«l)-i:0]ram0 do 
input [((SBW+1)«i).i:0]ram1~do 
input (((SBW+1)«1)-1 :0]ram2ldo 

input bad_carrier; 
input valldjn; 

SutH^mb^r^^^^^^^'^'^^-''^^'^^^^^^^ //6*SBWbits 

input (1:0] constellation; 
input [2:0] alpha; 

input tdin, te; 

input nrst, elk; 
//FOLDENDS 

//FOLDBEGINS 0 2 "reg / wire " 
//FOLDBEGINS 0 0 "outputs ..." " 
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//FOLDBEGINS 0 0 "ramO regs ..." 
reg [6:0]ram0_a; 

reg [((SBW+1)«1)-1:0]ramO_di: • 
reg ramO_ce; 
5 reg ramO_wreq; 
//FOLDENDS 

//FOLDBEGINS 0 0 "rami regs ..." 
reg [6:0]ram1_a; 
reg [((SBW+1)«1)-1:0]ram1_di; 
10 reg ram1_ce; 
reg ram1_wreq; 
//FOLDENDS 

//FOLDBEGINS 0 0 "ram2 regs ..." 
reg [6:0]ram2_a; 
15 reg [((SBW+1)«1)-1:0]ram2_di; 
reg ram2_ce; 
reg ram2_wreq; 
//FOLDENDS 

20 reg [SBW-1 :0]i_data; 

reg [SBW-1 :Ojq_data; 
reg discardj; 
reg discard_q; 

25 reg valid; 

//FOLDENDS 

//FOLDBEGINS 0 0 "inputs ..." 
reg valid_in_reg; 

30 reg [((SBW«2)+(SBW«1 ))-1 :0]data_in_reg; // 6*SBW bits 
reg symbol_reg, bad_carrier_reg; 

reg [1:0] constellation_reg; 
reg [2:0] alpha_reg: 
35 reg [((SBW+1)«1)-1:0]ramO_do_reg; 
reg [((SBW+1)«1)-1:0]ram1_do_reg; 
reg [((SBW+1 )«1 )-1 :0]ram2_do_reg; 



40 



//FOLDENDS 



reg [6:0' 
reg [6:0 
reg [6:0 
reg [6:0 
45 reg [6:0 
reg [6:0 



iO_adr_reg; 
i1_adr_reg; 
i2_adr_reg; 
i3_adr_reg; 
i4_adr_reg; 
i5_adr_reg; 



reg [2:0] mode_reg; 

reg [(SBW«2)+(SBW«1)-1:0]data_reg; //6*(SBW) bits 
50 reg [((SBW+1 )«1 )+SBW:0]i_out_buf_reg, q_out_buf_reg; // 3*(SBW+1 ) bits 

reg ram_filled_reg, out_buf_full_reg, bad_car_reg; 

wire [SBW:0] iOJn, qOJn. iljn. qljn ,i2Jn .q2Jn; 
55 wire (SBW:Oj iO ram, qO ram, i1 ram, q1 ram ,i2 ram .q2 ram; 
//FOLDENDS - _ _ _ 
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//FOLDBEGINS 0 2 "latch inputs " 

always @(posedge elk) 

begin 

bad_carrier_reg <= bad_carrier* 

valid Jn_reg <= validjn; 

data_in_reg <= datajn; 

symboLreg <= symbol; 

constellation^reg <= constellation- 

alpha_reg <= alpha; 

ramO_do_reg <= ramO_do; 

ram1_do_reg <= ram1_do; 

ram2_do_reg <= rann2 do; 
end " 
//FOLDENDS 

always @(posedge elk) 
begin 
if( -nrst ) 

//FOLDBEGINS 0 4 "reset " 
begin 

mode^reg <= 2*b00; 
valid <= 0; 
iO_adr_reg <= 0; 
i1_adr_reg <= 63; 
i2_adr_reg <= 105; 
i3_adr_reg <= 42; 
i4_adr_reg <= 21; 
i5_adr_reg <= 84; 



i_out_buf__reg <= 0; 
q_out_buf_reg <= 6; 
ram_filled_reg <= 0; 
out_buMull_reg <='0; 
end 

//FOLDENDS 

else 

begin 

if( valid_in_reg ) 

//FOLDBEGINS 0 6 "start cycle " 
begin 

data_reg <= data_in_reg; 
bad_car_reg <= bad_carrier req; 

ramO_wreq <= 0; 

ram1_a <= i1_adr_reg; 
ram1_wreq <= 0; 

ram2_a <= i2_adr_reg; 
ram2_wreq 0" 
//FOLDENDS ' 
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ramO_ce <= 1 ; 

ram1_ce <= (constellation_reg == 2*b10) | 
(constellation_reg == 2'b01); 
ram2_ce <= (constellation_reg == 2'b10); 

//FOLDBEGINS 0 2 "output i1 and q1 ..." 

if( out_buf_full_reg & (constellation_reg != 2'bOO)) 

begin 

valid <= 1 ; 

i_data <= i_out_buf_reg(((SBW+1)«1)-2:(SBW+1)]; 
discardj <= i_out_buf_reg[((SBW+1)«1)-1]; 

q_data <= q_out_buf_reg[((SBW+1)«1)-2:(SBW+1)]; 
discard_q <= q_out_buf_reg[((SBW+1)«1)-1]: 

//$write("DB(%Od %m): OUT(1):%x %x\n". $time, 
// i_out_buf_reg[((SBW+lj«1)-2:(SBW+1)]. 
// q_out_buf_reg[((SBW+1 )«1)-2:(SBW+1 )]); 
end 

//FOLDENDS 

mode_reg <= 3'b001; 
end 

//FOLDENDS 

else 

begin 

//$write("DB(%Od %m): m=%b\n". Stime. mode_reg); 

case( mode_reg ) 
//FOLDBEGINS 0 8 "3'b001 : ... " 
3'b001: begin 

//FOLDBEGINS 0 4 "logic to read qO.1.2 ..." 
ramO_a <= i3_adr_reg; 
ramO_wreq <= 0; 

ram1_a <= i4_adr_reg; 
rann1_wreq <= 0; 

ram2_a <= i5_adr_reg; 
ram2_wreq <= 0; 
//FOLDENDS 
valid <= 0; 

mode_reg <= 3'b010; 
end 
//FOLDENDS 

//FOLDBEGINS 0 8 "3*b010: ..." 

3'b010: begin 

nnode_reg <= 3'b011; 

//FOLDBEGINS 0 4 "output i2 and q2 ..." 

if( out_buf_full_reg & (constellation_reg == 2'b10)) 

begin 

valid <= 1; 

i_data <= i_out_buf_reg(SBW-1 :0]; 
discardj <= i_out_buf_reg[SBW]; 
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q_data <= q_out_buf_reg[SBW-1:0]; 
discard_q <= q_out_buf_reg[SBW]; 

//$write("DB(%Od %m): OUT(2):%x %x\n", $time 

// i_out_buf_reg[SBW-1 :0], 

// q_out_buf_reg(SBW-1:0]); 
end 

//FOLDENDS 
end 
//FOLDENDS 

//FOLDBEGINS 0 8 "a'bOl 1 • 
3'b0 11 .-begin 
valid <= 0; 

//$write("DB(%Od %m): ram read iO:%x i1:%x i2 %x\n" 
// $time, 

// ramO_do_reg[((SBW+1)«l)-i :SBW+n 
// ram 1 _do_reg(((SBW+ 1 )« 1 )- 1 : SBW+ 1 ' 
// ram2_do_reg[((SBW+1)«1)-l:SBW+1]); 

i_out_buf_reg <= {ramO_do reg{((SBW+1)«i)-i SBW+n 
ram1_do_reg(((SBW+1)«l7-irSBW+11 ^' 
ram2_do_reg[((SBW+1)«l)-l:SBW+1]}; 

//FOLDBEGINS 0 4 "logic to write new iO.1.2 ..." 

ramO_a <= iO_adr_reg; 

ramO_wreq <= 1; 

ramO_di <= {iOJn. qO_ram}; 

ram1_a <= i1_adr_reg; 

ram1_wreq <= 1; 

ram1_di <= {iljn, q1_ram}; 

ram2_a <= i2_adr_reg; 
ram2_wreq <= 1; 
ram2_di <= {i2Jn, q2 ram}; 
//FOLDENDS " ^ " ^' 
mode_reg <= 3'b100; 
end 
//FOLDENDS 

//FOLDBEGINS 0 8 "3'b100- 
3'b100: begin 

//$writerDB(%Od %m): ram read qO:%x q1:%x q2 %x\n" 
// $time, 

// ramO_do_reg[SBW:0], 
// ram1_do_reg[SBW:0]. 
// ram2_do_reg[SBW:0]); 

q_out_buf_reg <= {ramO do regfSBW Ol 
ram1_do_reg[SBW:0]. - - ' ^' 

ram2_do_reg(SBW:0]}; 

?,iiW^"^-^""-'"®9 ^= ""am filled reg; 
//FOLDBEGINS 0 4 "loglb to w7ite new qO.1,2 ..." 
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ramO_a.<= i3_adr_reg; 

ramO_wreq <= 1 ; 

ramO_di <= {iO_ram, qOJn}; 

ram1_a <= i4_adr_reg; 

ram1_wreq <=*1; 

ram1_di <= {i1_ram, q1Jn}; 

ram2_a <= i5_adr_reg; 
ram2_wreq <= 1; 
ram2_di <= {i2_ram. q2_in}; 
//FOLDENDS 

//FOLDBEGINS 0 4 "output iO and qO ..." 

if( out_buf_full_reg ) 

begin 

valid <= 1 ; 

i_data <= i_out_buf_reg[((SBW+1)«1)+SBW-1:((SBW+1)«1)]: 
discardj <= i_out_buf_reg[((SBW+1)«1)+SBW]; 

q_data <= q_out_buf_reg[((SBW+1)«1)+SBW-1:((SBW+1)«1)]; 
discard_q <= q_out_buf_reg[((SBW+1)«1)+SBWl; 

//SwriterDB(%Od %m): OUT(0):%x 7ox\n". $time, 

II i_out_buf_reg[((SBW+1)«1)+SBW-1 :((SBW+1)«1)], 
// q_out_buf_reg[((SBW+1)«1)+SBW-1:((SBW+1)«1)l); 
end 

//FOLDENDS 
mode_reg <= 3'b101; 
end 
//FOLDENDS 

//FOLDBEGINS 0 8 "3'b101: ... " 

3'b101:begin 

valid <= 0; 

//FOLDBEGINS 0 4 "increment ram address ..." 

if(i0_adr_reg==7*d125) 
begin 

iO_adr_reg <= 0; 

//FOLDBEGINS 0 2 "do i1_adr_reg (63 offset)..." 
i1_adr_reg <= (i1_adr_reg == 7'd20) ? 7'd84 : 
(i1_adr_reg == 7'd41) ? 7'd105 : 
(i1_adr_reg == 7'd62) ? 7'dO : 
(i1_adr_reg == 7'd83) ? 7'd21 : 
(i1_adr_reg == 7'd104) ? 7'd42 : 

7'd63 ; 

//FOLDENDS 

//FOLDBEGINS 0 2 "do i2_adr_reg (105 offset)..." 
i2_adr_reg <= (i2_adr_reg == 7'd20) ? 7'd42 : 

(i2 adr_reg == 7'd41) ? 7'd63 : 
(i2 adr reg =?= 7'd62) ? 7'd84 : 
(i2_adr_reg == 7'd83) ? 7'd105 : 
- (i2 adr reg == 7'd104) ? 7'dO : 

~ ~ 7'd21 : 

//FOLDENDS 
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15 



20 



//FOLDBEGINS 0 2 "do i3_adr_reg (42 offset) " 
i3_adr_reg <= (i3_adr_reg == 7'd20) ? 7'd105 • 

{i3_adr_reg == 7'd41) ? 7'dO • 
(i3_adr_reg == 7'd62) ? 7'd21 • 
(i3_adr_reg == 7'd83) ? 7'd42 • 
(i3_adr_reg == 7'd104) ? 7'd63 

//FOLDBEGINS 0 2 "do i4_adr_reg (21 offset) " 
i4_adr_reg <= (i4_adr_reg == 7'd20) ? 7'dO : 

(i4_adr_reg == 7'd41) ? 7'd21 
(i4_adr_reg == 7'd62) ? 7'd42 
(i4_adr_reg == 7'd83) ? 7'd63 
(i4_adr_reg == 7'd104) ? 7*d84 : 

//FOLDBEGINS 0 2 "do i5_adr_reg (84 offset) " 
i5_adr_reg <= (i5_adr_reg == 7'd20) ? 7'd63 : 

(i5_adr_reg == 7'd41) ? 7'd84 • 
(i5_adr_reg == 7'd62) ? 7'd105 • 
(i5_adr_reg == 7'd83) ? 7'dO : 
(I5_adr_reg == 7'd104) ? 7'd21 • 



7'd84 ; 

//FOLDENDS 



7'd105 ; 
//FOLDENDS 



25 



30 



35 



40 



45 



50 



55 



7'd42 ; 

//FOLDENDS 



ram_filled_reg <= l ; 

end 

else 

begin 

I0_adr_reg <= i0_adr_reg + 1 ; 
adr_reg <= (il 



end 



end 
//FOLDENDS 
end 
//FOLDENDS 
endcase 
end 
end 




assign iOJn = { bad_car_reg 

data_reg[(SBW«2)+(SBW<<1)-1 :(SBW«2)+SBW1V 
assign qOJn = { bad_car_reg 
data_reg[(SBW«2)+SBW-1 :SBW«2])- 
assign i1_in = { bad_car_reg. 
data_reg[(SBW«2)-1 :(SBW«1 )+SBWl)- 
assign q1Jn = { bad_car_reg 
data_reg[(SBW«1)+SBW-1 :SBW«1]V 
assign i2Jn = { bad_car_reg 
data_reg((SBW«1)-l :SBW]}- 
assign q2_in = { bad_car_reg ' 
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data_reg[SBW-1 :0]}; 

assign iO_ram = Lout_buf_reg[((SBW+1)«1)+SBW:((SBW+1)«1)]; 
assign qO_ram = q_out_buf_reg[((SBW+1)«1)+SBW:((SBW+1)«1>]; 
5 assign i1_ram = i_out_buf_reg[((SBW+1)«1)-1:SBW+1]; 

assign q1_ram = q_out_buf_reg[((SBW+1)«1)-1:SBW+1]; 
assign i2_ram = i_out_buf_reg[SBW:0]; 
assign q2_ram = q_out_buf_reg[SBW:0]; 

10 endmodule 



Listing 24 

// Sccsid: %W% %G% 

*** ****** ************************************ 

15 Copyright (c) 1997 Pioneer Digital Design Centre Limited 



20 module acc jDrod (elk, resync, load, symbol, new_j3hase, old_phase, xcount, 
acc_out); 

input elk, resyne, load, symbol; 
input [10:0] xeount; 
25 input [13:0] new_phase, old_phase; 
output [29:0] acc_out; 

reg [29:0] ace_out; 
reg [29:0] acejnt; 
30 reg [14:0] diff; 
reg [25:0] xdiff; 

reg sign; 

reg [14:0] mod_diff; 
35 reg [25:0] mod_xdiff; 



always @ (posedge elk) 
40 begin 

if (resync) 
begin 

acc_out <= 0; 
accjnt <= 0; 
45 end 

else 
begin 
if (load) 

50 accjnt <= accjnt + {xdiff[25]. xdiff[25]. // sign extend 
xdiff[25], xdiff[25]. xdiff}; 
if (symbol) 
begin 

acc_out <= accjnt; 
55 accjnt <= 0; 
end 
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end 
end 



always @ (new_phase or old phase or xcount) 
5 begin ~ ' 

diff 7 {new^hasen 3] new_phase} // sign extend up to allow 
sjg;^°'^Tf^*;|^®f^2J' o'd_phase}; // differences up to 360 

mod_diff = sign ? (-diff + 1) : diff- 
1 0 mod_xdiff = mod_diff * {4'bO. xcount}- 

xdiff = sign ? (~mod_xdiff + 1) : mod xdiff- 
end - 



endmodule 



// Sccsid: %W% %G% ^ 

. 

20 Copyright (c) 1 997 Pioneer Digital Design Centre Limited 



25 



35 



module acc_simple (elk. resync, load, symbol. new_phase. old_phase. acc.out); 



input elk, resync, load, symbol; 
input [13:0] new_phase. old phase- 
30 output [20:0] acc_out: 



reg [20:0] acc_out; 
reg [20:0] acc Jnt; 
reg [14:0] diff; 



always @ (posedge elk) 
begin 

if (resync) 
40 begin 

acc_out <= 0; 

accjnt <= 0; 
end 

45 else 
begin 
if (load) 

50 cliff[14]. diff[14];diff}; 

if (symbol) 
begin 

acc_out <= accjnt; 
accjnt <= 0; 
55 end 
end 



wo 9819410A2_I_> 



wo 98/19410 PCT/US97/18911 

247 

end 

always @ (new_phase or old_phase) 

diff = {new_phase[13], new^phase} // sign extend up to allow 
5 - {oldj3hase[13]. old _phase}; // differences up to 360 

always @ (diff or load) 
begin: display 

10 reg[14:0] reaLdiff; 

if (load) 
begin 

if (diff[14]) 
15 begin 

reaLdiff = (--diff + 1); 

$display ("diff = -%0d", reaLdiff); 

end 

else 

20 Sdisplay ("diff = %0d". diff); 
end 

end // display 



25 



30 



endmodule 

Listing 26 

// Sccsid: %W% %G% 

, 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 



7 



35 module addr_gen (elk, resync. u_symbol, uc_pilot, got_phase, en, load, guard, 
addr, xcount. guard^reg, symbol); 

input elk, resync, u_symbol, uc_pilot, got_phase; 
input [1:0] guard; 
40 output en. load, symbol; 
output [1 :0] guard_reg; 
output [9:0] addr; 
output [10:0] xcount; 

45 reg en. load. load_p. inc_count2. symbol; 
reg [1:0] guard_reg; 
reg [5:0] count45; 
reg [10^0] xcount; 
reg [9:0] addr; 

50 

always @ (posedge elk) 
begin 
if (resync) 
55 begin 

count45 <= 0; 
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load_p <= 0; 
load <= 0; 
inc_count2 <= 0; 
symbol <= 0; 
5 guard_reg <= 0; 
end 

else 
begin 
10 if(u_symbol) 
begin 

inc_count2 <= 1 ; 
guard_reg <= guard; 
end 

15 if (inc_count2 && uc_pilot) 
begin 

inc_count2 <= 0; 
count45 <= 0; 
end 

20 if (got_phase) 

count45 <= count45 +1; 
load_p <= en; 
load <= load_p; 

symbol <= (inc_count2 && uc_pilot); 

25 

addr <= count45; 

en <= got_phase && Iresync && (count45 < 45); // !! 45 
end 
end 

30 

always @ (count45) 
case (count45) 





1 : xcount = 


1: 




2: xcount = 


49; 


35 


3: xcount = 


55; 




4: xcount = 


88; 




5: xcount = 


142; 




6: xcount = 


157; 




7: xcount = 


193; 


40 


8: xcount = 


202; 




9: xcount = 


256; 




10: xcount = 


280; 




1 1 : xcount = 


283; 




12: xcount = 


334; 


45 


13: xcount = 


433; 




14: xcount = 


451; 




15: xcount = 


484; 




16: xcount = 


526; 




17: xcount = 


532; 


50 


18: xcount = 


619; 




19: xcount = 


637; 




20: xcount = 


715; 




21: xcount = 


760; 




22: xcount = 


766; 


55 


23: xcount = 


781; 




24: xcount = 


805; 
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25: xcount = 874 
26: xcount = 889 
27: xcount = 919 
28: xcount = 940 
29: xcount = 943 
30: xcount = 970 
31: xcount = 985 
32: xcount =1051 
33: xcount = 1102 
34: xcount = 1108 
35: xcount =1111 
36: xcount = 1138 
37: xcount = 1141 
38: xcount =1147 
39: xcount = 1207 
40: xcount = 1270 
41: xcount = 1324 
42: xcount = 1378 
43: xcount = 1492 
44: xcount = 1684 
45: xcount = 1705; 
default: xcount = 0; 
endcase 
endmodule 



// Sccsid: %W% %G% 



Listing 27 



30 Copyright (c) 1997 Pioneer Digital Design Centre Limited 



7 



35 



40 



45 



50 



55 



module avg_8 (elk. resync, symbol, in_data, avg^out); 

parameter phase_width = 12; 

input elk, resync, symbol; 
input [phase_width-2:0] in^data; 
output [phase_width-2:0] avg_out; 

reg [phase_width-2:0] avg_out; 
reg [phase_width-2:0] store [7:0]; 



wire 
wire 
wire 
wire 
wire 
wire 
wire 
wire 



[phase^ 
[phase" 
[phase, 
[phased 
[phase" 
[phase" 
[phase" 
[phase^ 



_width- 
"width- 
_width- 
"width- 
"width- 
^width- 
"width- 
"width- 



2:0] store7 
2:0] store6 
2:0] stores 
2:0] store4 
2:0] store3 
2:0] store2 
2:0] storel 
2:0] storeO 



store[7; 
store[6; 
store[5" 
store[4 
store[3 
store[2 
store[1 
store[0 
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wire [phase_width+1:0] sum = ({storeZrphase width-21 
store7[phase_width-2I, store?} ~ 

+ {store6[phase_width-2], store6[phase width- 
store6} - 

stores} 

store4} 

store3} 

store2} 

store 1} 

storeO}); 



+ {store5[phase_width-2]. store5[phase_width 
+ {store4[phase_width-2]. store4[phase_width 
+ {store3[phase_width-2], store3[phase_width 
+ {store2(phase_width-2]. store2[phase_width- 
+ {store 1[phase_width-2I, store 1(phase_width- 
+ {store0[phase_width-2]. storeO[phase_width- 



PCT/US97/18911 

store7[phase_width-2], 
-2], store6[phase_width-2], 
-2], store5[phase_width-2]. 
-2]. store4[phase_width-2]. 
-2], store3[phase_width-2]. 
•2], store2[phase_width-2]. 
2], store 1[phase_width-2]. 
2], storeO[phase_width-2I. 



always @ (posedge elk) 

begin 

if (resync) 

begin 

store[7] <= 0; 
store[6] <= 0; 
store[5] <= 0; 
store[4] <= 0; 
store[3j <= 0; 
store[2j <= 0; 
store[li <= 0; 
storefoj <= 0; 
avg_out <= 0; 
end 

else if (symbol) 
begin 



store[7 
store[6 
store[5 
store(4 
store[3 
store[2 
storefl 
store[0 



<= store 
<= store 
<= store 
<= store 
<= store 
<= store 
<= store 
. J in_data; 
avg^out <= sum » 3; 
end 
end 



:6] 
:5] 
:4] 
:3] 

2] 

1] 

;o] 



endmodule 



Listing 28 



// Sccsid: %W% %G% 

. — 
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55 



module twowire26 (elk. rst. in_valid. din. out_accept. out_valid. In.accept. 
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dout, set); 



input elk, rst. set, in_valid. out_accept; 
5 input [25:0] din; 

output in_accept, out_valid; 
output [25:0] dout; 

reg in_accept, out^valid, accjnt. accjnt_reg, in_valid_reg. valjnt; 
reg [25:0] dout. din_reg; 

10 

always @ (posedge elk) 
begin 
if (rst) 

out_valid <= 0; 
1 5 else if (ace Jnt 1 1 set) 
out_valid <= vaMnt; 

if (in_accept) 
begin 

20 in_valid_reg <= in_valid; 
din_reg <= din; 
end 

if (ace Jnt) 

25 dout <= in_accept ? din : din_reg; 
if (set) 

accjnt^reg <= 1; 
else 

30 accjnt_reg <= accjnt; 
end 

always @ (out_accept or out_valid or accjnt_reg or in_valid or in_valid_reg) 
begin 

35 accjnt = out_accept 1 1 !out_valid; 

in_aceept = accjnt_reg 1 1 !in_valid_reg; 
valjnt = in_accept ? in_valid : in_valid_reg; 
end 

40 endmodule 



module buffer (elk, nrst, resync, u^symboljn. uc_pilotJn, ui_datajn. 
uq_datajn, u_symbol_out, uc_pilot_out, ui_data_out. 
45 uq_data_out, got_phase); 

input elk, nrst. resyne, u^symboljn. uejDilotJn, got^phase; 
input [11:0] ui_datajn, uq_datajn; 
output u_symboLout, ucjpilot^out; 
50 output [1 1:0] ui_data_out, uq_data_out; 

reg u_symboLout, uejpilot_out, accept; 
wire u_symbol_o, uc_pilot_o; 
reg [11:0] ui_data_out, uq_data_out; 
55 wire [1 1 :0] ui_data_o, uq_data_o; 
wire a, v; 
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wire [25:0] d; 

wire in_valid = u_symbolJn 1 1 uc^pilotjn; 
wire rst = !nrst \ \ resync; 

twowire26 tw1 (xlk(clk), .rst(rst), .in_valid(in_valid), .din({u symbol in 
ucjDiloMn. u(_datajn. uq_datajn}). .out accept(a) " 
.out_valid(v). .in_accept(). .dout(d), .set(rbO)); 

twowire26 tw2 (.clk(clk), .rst(rst), .in_valid(v). .din(d) 

.out_accept(accept). .out_valid(out_valid). .in_accept(a) 
.dout({u_symboLo. uc_pilot o, ui data o. uq data o\) ' 
.set(rbO)); " " - • m„ td^u/;. 



always @ (u_synnboLo or uc_pilot_o or ui_data_o or uq data o or out valid or 

accept) — — « 

begin 

20 if (out_valid && accept) 
begin 

u_synribol__out = u_symbol_o; 

uc_pilot_out = uc _j3ilot_o; 

ui_data_out = ui_data_o; 
25 uq_data_out = uq_data_o; 
end 
else 
begin 

u_symbol_out = 0; 
30 uc_pilot_out = 0; 
ui_data_out = 0; 
uq_data_out = 0; 
end 
end 

35 

always @ (posedge elk) 
begin 

if (rst 1 1 gotjDhase) 
accept <= 1 ; 
40 else if (uc_pilot_out) 
accept <= 0; 
end 



endmodule 



Listing 29 



// Sccsid: %W% %G% 

y * 

50 Copyright (c) 1 997 Pioneer Digital Design Centre Limited 
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module divide (elk, go. numer, denom, answ. got); 
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*********** * ^ 

this divider is optimised on the principal that the answer will always be 
less than 1 - ie denom > numer 

**** * ****** ***** * ************ **.** 1 

input elk, go; 

input [10:0] numer, denom; 
output got; 
output [10:0] answ; 

reg got; 

reg [10:0] answ; 

reg [20:0] sub, internal; 

reg [3:0] dcount; 



always @ (posedge elk) 
begin 

if (go) 

begin 

deount <= 0; 
internal <= numer « 10; 
sub <= denom « 9; 
end 

if (dcount < 11) 
begin 

if (internal > sub) 
begin 

internal <= internal - sub; 

answ[10 - dcount] <= 1 ; 
end 
else 
begin 

internal <= internal; 
answ[1 0 - deount] <= 0; 
end 

sub <= sub » 1; 
dcount <= dcount + 1; 
end 

got <= (dcount == 10); 
end 

endmodule 

Listing 30 

// Sccsid: %W% %G% 

/**** ********* — * ******************************** 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 
****** ** **************** 1 



module fserr^str (elk, nrst, resync, u_symbol, uc_j)ilot. ui_data, uq_data. guard, 
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freq sweep. sr_sweep. lupdata. upaddr. upwstr. uprstr. upseh 
upsel2, ram_di, te, tdin. freq_err. samp err. ram rnw, 
ram_addr, ram_do, tdout); ~ ~ 

5 input elk, nrst. resync. u_symbol. uc_pilot. upwstr. uprstr. te, tdin. upseh 
upsei2; ' 
input [1:0] guard; 

input [3:0] freq_sweep, sr_sweep, upaddr; 

input [1 1 :0] ui_data, uq_data; 
10 input [13:0] ram_do; 

output ram_rnw, tdout; 

output [9:0] ram_addr; 

output [12:0] freq_en-. samp_err; 

output [13:0] ram_di; 
15 inout [7:0] lupdata; 

wire got_phase, en, load, symbol, u_symbol buf. uc pilot buf 

wire freq_open. sample_open; ~ _ _ . 

wire [1:0] guard_reg; 
20 wire [10:0] xcount; 

wire [11:0] ui_data_buf. uq_data_buf 

wire [1 3:0] phasejn. phase_out; 

wire [20:0] acc_out_simple; 

wire [29:0] acc_out_prod; 
25 wire [12:0] freq_err_uf. samp_err_uf; 

wire [12:0] freq_err_fil. samp_err_fil. freq twiddle, 
sample_twiddle; ~ 

30 buffer buffer (.clk(clk). .nrst(nrst). .resync(resync). .u symbol in(u symbol) 
.uc_pilot_m(uc_pilot). .ui_data_in(ui_data), ~ - v - / /• 
.uq_datajn(uq_data). .u_symbol_out(u_symbol buf) 
.uc_pilot_out(uc_pilot_buO. .ui_data_out(ui_data'" but) 
.uq_data_out(uq_data_buf), .got_phase(got_phase)); ' 

35 

tan_taylor phase_extr (.clk(clk). .nrst(nrst). .resync(resync) 
.uc_pilot(uc_pilot_buf), .ui_data(ui_data_buf), 
.uq_data(uq_data_buf). .phase(phase in). 
.got_phase(got_phase)); 

addr_gen addr gen (.clk(clk). .resync(resync). .u_symbol(u symbol buf) 
.uc_j)ilot(uc_pilot_buf). .got_phase(got_phase), .en(en). 
.load(load). .guard(guard). .addr(ram_addr). .xcount(xcount) 
.guard_reg(guard_reg). .symbol(symbol)); 

pilot_store pilot_store (.clk(clk). .en(en). .ram_do(ram do) 
.phase_in(phasejn), .ram_rnw(ram_rnw), 
.ram_di(ram_di), .phase_out(phase_out)); 

50 acc_simple acc_simple (.clk(clk). .resync(resync). .load(load) 
.symbol(symbol). .new_phase(phasejn). 
.old_phase(phase_out), .acc_out(acc_out_simple)); 

acc_prod accjjrod (.clk(clk). .resync(resync). .load(load). 
55 .symbol(symbol). .new jDhase(phase In). 

.old_phase(phase_out), .xcount(xcount) ' 



40 



45 
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. acc_out(acc_out_p rod )) ; 

slow_arith slow_arith (.acc_simple(acc_out_simple), ,acc_procl(acc_out_prod), 
.guard(guard_reg), .freq_err_uf(freq_err_uf). 
.samp_err_uf(samp_err_uf)); 

avg_8 #(14) 

lpf_freq (.clk(clk). .resync(resync), .symbol(symbol), 
.in_data(freq_err_uf), .avg_out(freq_err_fil)); 

avg,8#(14) 

ipf_samp (.clk(clk), .resync(resync). .symbol(symbol). 
.in_data(samp_err_uf). .avg_out(samp_err_fil)); 

15 r median_filter#(14) 

IpMreq (.clk(clk), .nrst(nrst). .in_valid(symbol). 
.din(freq_err_uf), .dout(freq_err_fil)); 

median_filter#(14) 
20 lpf_samp (.clk(clk), .nrst(nrst), .in_valid(symbol). 

.din(samp_err_uf), .dout(samp_err_fil)); */ 

sweep_twiddle sweep_twiddle (.freq_err_fil(freq_err_fil), 
25 .samp_err__fil(sannp_err_fil). 

.freq_sweep(freq_sweep). 

.sr_sweep(sr_sweep). .freq_open(freq_open). 

.sample_open(sample_open), 

.freq_twiddle(freq_twiddle). 
30 .sample_twiddle(sample_twiddle), 

.freq_err_out(freq_err), 

.samp_err_out(samp_err)); 

lupidec lupidec (.clk(clk), .nrst(nrst), .resync(resync). .upaddr(upaddr), 
35 .upwstr(upwstr), .uprstr(uprstr), .lupdata(lupdata), 

.freq_open(freq_open). .sample_open(sample_open), 
.freq_twiddle(freq_twiddle), .sample_twiddle(sannple_twiddle), 
.sample Joop_bw(), .freqJoop_bw(), .freq_err(freq_err). 
.samp_err(samp_err), .f_err_update(), .s_err_update()); 

40 

endmodute 

Listing 31 

// Sccsid: %W% %G% 
45 / **************** 

Copyright (c) 1997 Pioneer Digital Design Centre Linnited 
*** ************* — ************ , ^ 



50 



55 



module lupidec (elk, nrst, resync, upaddr, upwstr, uprstr, lupdata, freq_open. 
sample_open. freq_twiddle, sample_twiddle, sampleJoop_bw. 
freqJoop_bw, freq_err, samp_err, f_err_update, 
s_err__update); 

input elk, nrst, resync, upwstr, uprstr, f_err_update, s_err_update; 
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input [3:0] upaddr; 
input [12:0] freq_err, samp_err; 
inout [7:0] lupdata; 
output freq_open. sample_open; 
5 output [12:0] freq_twiddle. sampie_twiddle, sample Joop_bw. freqJoop_bw: 

reg freq_open. sample_open; 

reg [12:0] freq_twiddle. sample_twiddle, sample_loop_bw. freqjoop_bw; 

10 wire wr_str; 

wire [3:0] wr_addr; 
wire [7:0] wr_data; 

1 5 rFOLDBEGINS 0 2 "address decode"*/ 

rFOLDBEGINS 0 0 "read decode"*/ 

wire f_err_h_ren = (upaddr == 4'he); 

wire f_errj_ren = (upaddr == 4'hf); 

wire s_err_h_ren = (upaddr == 4'hc)- 
20 wire s_err_l_ren = (upaddr == 4'hd);' 

wire f_twd_h_ren = (upaddr == 4'h4V 

wire f_twdj_ren = (upaddr == 4'h5);' 

wire s_twd_h_ren = (upaddr == 4'h8); 

wire s_twdj_ren = (upaddr == 4'h9)- ' 
25 wire fjbw_h_ren = (upaddr == 4'h6)' 

wire fjbwj_ren = (upaddr == 4'h7) ' 

wire s_lbw_h_ren = (upaddr == 4'haV 

wire sjbwj_ren = (upaddr == 4*hb)- 

/*FOLDENDS*/ ^' 

30 

rFOLDBEGINS 0 0 "write decode"*/ 

wire f_twd_h_wen = (wr_addr == 4'h4)- 

wire f_twdj_wen = (wr_addr == 4'h5); ' 

wire s_twd_h_wen = (wr_addr == 4'h8V 
35 wire s_twdj_wen = (wr_addr == 4'h9)-' 

wire fjbw_h_wen = (wr_addr == 4'h6)'; 

wire fjbwj_wen = (wr_addr == 4'h7)- ' 

wire s_lbw_h_wen = (wr_addr == 4'ha); 

wire s Ibw I wen = (wr addr == 4'hbV ' 
40 rFOLDENDS*/ ~ ^' 

rFOLDENDS*/ 



/*FOLDBEGINS 0 2 "upi regs"*/ 
rFOLDBEGINS 0 0 "freq error status reg "*/ 

upi_status_reg2 fr_err (.clk(clk). .nrst(nrst). .status value({3'b0 freq err}) 
.capture_strobe(f_err_update). .read strob'i(uprstr) ''^"^-^""^ 

:"p'd-a^St^)^-""^• -^^^^^ 

rFOLDENDS-/ 
rFOLDBEGINS 0 0 "sample error status reg"*/ 

up._status reg2 sr err (.clk(clk). .nrst(nrst). .status value({3'b0. samp err}) 
•capture strobe(s_err_update). .read strobe(uprstr) ^'-^''H- 
55 :Mruy&xr'--"^' •-9--'-t_h(s.err_h_ren). 

rFOLDENDS*/ 



45 



50 
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/•FOLDBEGINS 0 0 "control regs write latch"*/ 
upi_write_latch #(3) 

writejat (.clk(clk). .nrst(nrst), .lupdata(lupdata). .upaddr(upaddr), • 
5 .write_strobe(upwstr), .write_data(wr_data). 

.write_address(wr addr), .write sync(wr str)): 
/•FOLDENDS*/ " _ v - // 

/•FOLdBEGlNS 0 0 "freq twiddle etc rdbk regs"*/ 
10 upi_rdbk_reg freq_r_upper (.control_value({freq_open. 2'bO. freq twiddle[12 8])) 
.read_strobe(uprstr). .reg_select(f_twd_h_ren). 
.lupdata(lupdata)); 

upi_rdbk_reg freq_rJower (.control_value(freq_twiddle[7:0]), .read strobe(uprstr) 
15 .reg_select{f twd I ren). .lupdata(lupdata)); 

/*FOLDENDSV ~ 

/•FOLDBEGINS 0 0 "samp twiddle etc rdbk regs"*/ 
upi_rdbk_reg samp_r_upper (.control valueffsample open, 2'bO 
20 sample_twiddle(12:8]}). - i _ k 

.read_strobe(uprstr), .reg_select(s_twd_h_ren). 

.lupdata(lupdata)}; 

upi_rdbk_reg samp_r_lower (.control_vaiue(sample_twiddle[7:01) 
25 .read_strobe(uprstr), 

.reg_select(s_twdj_ren). .lupdata(lupdata)); 
/*FOLDENDS*/ 

/•FOLDBEGINS 0 0 "freq loop bw rdbk regs"*/ 
30 upi_rdbk_reg frjp_r_upper (.control_value({3'b0. freqJoop_bw[12:8]}), 
.read_strobe(uprstr). .reg_select(f_lbw_h_ren). 
.lupdata(lupdata)): 

upi_rdbk_reg frJp_rJower (.control_value(freqjoop_bw[7:01) 
35 .read_strobe(uprstr), .reg_select(f_lbwj_ren), 

.lupdata(lupdata)); 
TFOLDENDS*/ 

/•FOLDBEGINS 0 0 "samp loop bw rdbk regs"*/ 
40 upi_rdbk_reg srjp_r_upper (.control_value({3'b0. sampleJoop_bwri2:81}) 
.read_strobe(uprstr). .reg_select(sjbw_h_ren). 
.iupdata(lupdata)}; 

upi_rdbk_reg srJp_rJower (.control_value(samplejoop_bw[7:0]) 
45 .read_strobe(uprstr), .reg_select(sjbwj_ren), 

.lupdata(lupdata)): 
/*FOLDENDS*/ 
/*FOLDENDS*/ 

50 /*FOLDBEGINS 0 2 "control regs"*/ 
always @ (posedge elk) 
begin 
if(!nrst) 
begin 

55 freq_open <= 0; 

sample_open <= 0; 
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freq^twiddle <= 0; 
sample_twiddle <= 0; 
sampleJoop_bw <= b; //???? 
freq_loop_bw <= 0; //???? 
5 end 
else 
begin 
if (wr_str) 
begin 

10 if (Ltwd_h_wen) 
begin 

freq_open <= wr_data[7]; 
freq_twiddle[12:8] <= wr__data[4;01; 
end 
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15 



30 



if (f_twd_l_wen) 

freq_twiddle[7:0] <= wr_data[7:0]; 



if {s_twd_h_wen) 
20 begin 

sample_open <= wr_data[7]; 
^saj^ple_twidd[e[1 2:8] <= wrj,data[4:0]; 

25 if (s_twd J_wen) 

sample_twiddle[7:0] <= wr_data[7:0]; 

if (f_lbw_h_wen) 

freqJoop_bw(12:8] <= wr_data[4:0]; 

if (fjbwj_wen) 
freq_loop_bw[7:0I wr_data[7:0]; 

if (sjbw__h_wen) 
35 sampleJoop_bw[12:8] <= wr_dataf4;0]; 

if (s JbwJ_wen) 

samplejoop_bw[7:0] <= wr_data[7:0]; 

40 end 
end 
end 

/*FOLDENDSV 
45 endmodule 

Listing 32 

// Sccsid: %W% %G% 
50 *********** *********,,,,™,,,, 

**9*°*Py:i^^^^^^ Digital Design Centre Limited 

** ******.* ^ 

55 
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module pilot_store (elk, en, ram^do, phasejn, ram_rnw, ram_di. phase_out); 

input elk. en; 
// input [9:0] addr; 
5 input [1 3:0] phasejn; 
input [13:0] ram_do; 
output ram^rnw; 

output [13:0] ram_di. phase_out; 

10 wire ram_rnw; 

//regen_d1; 

// reg [9:0] addr_reg; 

//reg [13:0] mem [579:0]; 

reg [13:0] phase_out; //, phasejn_reg; 
15 wire [13:0] ram_di; 



always @ (posedge elk) 
begin 

20 //en_d1 <= en; 

if (en) 
begin 

// phasejn_reg <= phasejn; 
25 // addr^reg <= addr; 

phase_out <= ram_do; 
// phase_out <= mem[addr]; 
end 

//if (en_d1) 
30 // mem[addr_reg] <= phasejn_reg; 
end 

assign ram_di = phasejn; 
assign ram_rnw = !en; 

35 

endmodule 

Listing 33 

// Sccsid: %W% %G% 

4Q ^ 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 
* 

45 

module slow_arith (ace_simple, acc_prod, guard, freq_err_uf, samp_err_uO; 

input [1:0] guard; 
50 input [20:0] acc_simple; 
input [29:0] acc^prod; 
output [12:0] freq_err_uf. samp_err_uf; 

reg [12:0] freq_err_uf, samp_err_uf; 
55 reg [20:0] freq_seale; 
reg [38:0] inter Jreq; 
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reg sign; 

reg [20:0] mod_acc; 

reg [38:0] mod_trunc_sat; 

reg [41:0] mod; 

5 

reg sign_a. sign_b, sign_inter sr; 
reg [20:0] mod_acc_s; 
reg [29:0] mod_acc_p; 
reg [35:0] a, mod_a; 
10 reg [35:0] b. mod_b; 

reg [36:0] nnod_diff. diff; 

reg [46:0] inter_sr. modJnter_sr; 



15 



20 



parameter sp = 45. acc_x = 33927. samp_scale = 1 1'blOIOOIOOIIO; 



45 



always @ (guard) 
case (guard) 



?-hn? e = 2 bO1 1 1 101001 1 1 1 1000101 1 ; // guard == 64 

luVn- fr®q-scale = 21'b011 101101110001000011- //guard == 128 
2 b 0: freq_scale = 2i;b01110000010001110101o: guaS == 256 
2 b1 1 : freq_scale = 21 'bO1 1 001 01 00001 1001 1 1 1 1 // guard == 512 



endcase 

25 always @ (acc_simple or freq scale) 
begin ~ 

sign = acc_simple[20]; 

-^n I^Sn-^ff " ^'3" (racc_simple + 1) : acc simple; 
30 mod = (freq_scale " mod_acc); - k . 

// interjreq = sign ? (-mod + 1) : mod; 

if (mod[41:38] > 0) 
begin 

35 mod_trunc_sat = 39'h3fffffffff; 

$display("freq_err saturated")- 
end 

else 

mod_trunc_sat = mod[38:0]; 

interjreq = sign ? (-mod_trunc_sat + 1) : mod_trunc_sat; 

freq_err_uf = inter_freq » 26- 
end 

always @ (acc_simple or acc prod) 
begin 

sign_a = acc_prod(29]; 
50 mod acc_p = sign_a ? (~acc_prod + 1) : acc prod- 
mod_a = sp * mod_acc _p; ^_h>"u. 
a = sign_a ? (~mod_a + 1) : mod_a; 

sign_b = acc_simple[20]; 
55 mod acc_s = sign_b ? (-acclsimple + 1) : acc simple- 
mod_b = acc_x * mod_acc_s7 c«uc._bimpie. 
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b = sign_b ? (~mod_b + 1 ) : mod_b; 

diff = {a[35]. a} - {b[35]. b}; // sign extend 

sign_inter_sr = diff[36]; 

mod_diff = signjnter_sr ? (~diff + 1) : diff; 

mod_inter_sr = (mod_diff * samp_scale); 

inter_sr = signjnter_sr ? (~mod_inter_sr + 1) : modJnter_sr; 

samp_err_uf = inter_sr » 34; //!!scaling!! 
end 

endmodule 

Listing 34 

// Sccsid: %W% %G% 
. * 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 

'* ** * ****** »* — •»/ 

module sweep_twiddle (freq_err_fii, sannp_err_fil. freq_sweep, sr_sweep. 

freq_open, sample_open. freq_twiddle, sample_twiddle, 

freq_err_out, samp_err_out); 

input freq_open. sample_open; 
input [3:0] freq_sweep, sr_sweep; 

input [12:0] freq_err_fil, samp_err_fil, freq_twiddle. sample twiddle- 
output [12:0] freq_err_out. samp_err_out; 

reg [12:0] freq_err_out, samp_err_out; 

reg [12:0] freq_err_swept, samp_err_swept; 



always @ (freq_sweep or freq_err_fil) 
case (freq_sweep) 

4'bOOOO: freq_err_swept = freq_err_fil; 
4'b0001: freq_err_swept = freq_err_fil + 500; 
4'b0010: freq_en-_swept = freq_en'_fil + 1000; 
4'b0011: freq_err_swept = freq_err_fil + 1500; 
4'b0100: freq_err_swept = freq_err_fil + 2000; 
4*b0101: freq_err_swept = freq_err_fil + 2500; 
4*b0110: freq_err_swept = freq_err_fil + 3000; 
4'b01 1 1 : freq_err_swept = freq_err_fil + 3500; 
default: freq_err_swept = freq_err_fil; 
endcase 

always @ (sr_sweep or samp_err_fil) 
case (sr_sweep) 

4'bOOOO: samp_err_swept = samp_err_fil; 
4'b0001: samp_err_swept = samp_err_fir+ 500; 
4'b0010: samp_err_swept = samp_err_fil - 500; 
4'b0011: samp_err_swept = samp_err_fil + 1000 
4'b0100: samp_err_swept = samp_err_fil - 1000; 
4'b0101: samp_err_swept = samp_err_fil + 1500 
4'b0110: samp_err_swept = samp_err_fil - 1500- 
4'b01 1 1 : samp_err_swept = samp_err_fil + 2000 
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4'b1000: samp_err_swept = samp_err_fil - 2000; 
default: samp_err_swept = samp_err fil* 
endcase " 

always @ (freq_err_swept or freq_open or freq twiddle) 
if (freq_open) ^- ^ 

freq_err_out = freq_twiddle; 
else 

freq_err_out = freq_err_swept + freq^twiddle; 

?>lmpf opSf)"^'^ sample_open or sample.twiddle) 

samp^erFout = sample_twiddle; 
else 

1 5 samp_err_out = samp_err_swept + sample^twiddle; 
endmodule 

20 

// Sccsid: %W% %G% 

/* * **** 



10 



25 



50 



Copyright (c) 1997 Pioneer Digital Design Centre Limited 



30 gof "p-hlsef "^-data. phase. 

input elk, nrst, resync, uc_pilot; 
input [1 1 :0] ui_data, uq_data; 
output got_phase; 
35 output [13:0] phase; 

reg got_phase; 
reg [1 3:0] phase; 

An f^i\ ^9ti. modqeqi. i_zero_reg, q zero reg. go; 

40 reg [1:0] quadrant; - ^' ^ ' 

reg [6:0] count, count_d1; 

K9'2I "^od_q, coeff, numer, denom- 

45 wire got; 

wire [10:0] div; 



parameter pi = 6434, pi_over2 = 3217. minus_pi_o2 = 13167, pi_over4 = 1609; 
divide div1 (elk. go. numer. denom. div. got); 



always @ (posedge elk) 
begin 

55 if (Inrst 1 1 resync) 

count <= 7'b1111lll; 
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else 
begin 

if (uc^pilot) 
begin 

5 mod J <= ui_data[11] ? (-'Ui_data[10:0] + 1) : ui_data[10:0]; 

mod_q <= uq_data[11] ? (-uq_data(10:0] + 1) : uq_data[10:0]; 
quadrant <= {uq_data[1 1], ui_data[1 1]}; 
count <= 0; 
go <= 0; 
10 end 

else 
begin 

if (count == 0) 
15 begin 

qgti <= (mod_q > mod J); 

modqeqi <= (mod_q == mod J); 

i_2ero_reg <= (modj == 0); 

q_zero_reg <= (mod_q == 0); 
20 add <= 0; 

go <= 1; 

count <= 1; 

end 

25 if ((count >= 3) && (count < 71)) 
count <= count + 2; 

if (count ==1) 
begin 
30 go <= 0; 

if (got) 

begin 

sum <= div; 
x_pow <= div; 
35 x_sqd <= x_sqd_unshift » 11; 

count <= 3; 
end 
end 

40 if ((count > 1) && (count < 69)) 

X _pow <= x_pow_unshift » 11; 

if ((count > 3) && (count < 69)) 

next__term <= next_term_unshift » 12; 

if ((count > 5) && (count < 69)) 
45 begin 

prev_sum <= sum; 

sum <= add ? (sum + next_term) : (sum - next_term); 
add <= !add; 
end 

50 end 

if (count == 67) 

sum <= (prev_sum + sum) » 1 ; 
if (count == 69) 

casex ({i_zero_reg, q_zero_reg, qgti. modqeqi, quadrant}) 
55 6'b1xx0_0x: phase <= pi_over2; 

6'b1xx0_1x: phase <= minus_pi_o2; 
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6'b01x0_x0: phase <= 0; 
6'b01xO_x1: phase <= pi; 

6'b0010_00: phase <= {2"b00. flipf11;0lV 
6'b0010_01: phase <= pi -{2'bOO. flipfn oiV 
6*b0010_10: phase <= 0 - {2'bOO, fliprn oiV 
6'b0010_1 1 : phase <= {2'bOO, flip[l 1 :0]} - pi; 

6'b0000_00: phase <= {2'bOO, sum[11:0l}- 
6'b0000_01: phase <= pi - {2'bOO. sumfl l':01}- 
6'b0000_10: phase <= 0 - {2'bOO. sumri1:0lV 
6'b0000_1 1 : phase <= {2'bOO. sum[1 1 :0J} - pi; 

6'bxxx1_00: phase <= pi_over4; 
6'bxxx1_01: phase <= pi - pi_over4; 
6'bxxx1_10: phase <= 0 - pi_over4; 
6'bxxx1_11: phase <= pi_over4 - pi; 
endcase 



count_d1 <= count; 
got_phase <= (count == 69); 
end 
end 

always @ (div) 

x_sqd_unshift = div * div; // had to do this in order to stop synthesis throwing away 
always @ (x_pow or coeff) 

next_term_unshift = (x_pow * coeff); //compass dp_cell mult_booth_csum 
always @ (x_pow or x_sqd) 

x_pow_unshift = (x_pow * x_sqd); // compass dp_cell mult_booth_csum 

always @ (count_d1) 
case (count_d1) 

3: coeff = irb10101010101 

5: coeff = H'bOl 1001 10011 

7: coeff = 1 1'bOIOOIOOIOOl 

9: coeff = 1 1 "bOOl 1 1 0001 1 1 . 

11: coeff = 11'bOOIO1 110100 

13: coeff = 11'bOOIOO1 1 1011 

15: coeff = 11'bO0 1000 10001 

1 7: coeff = 1 1 'bOOOl 1 1 1 0001 

19: coeff = 11'bOOO1 10101 11 

21 : coeff = 1 1 'bOOOl 1 00001 1 

23: coeff = 1 1'bOOOI 01 10010 

25: coeff = ll'bOOOl 01 00011 

27: coeff = 11'b00010010111 

29: coeff = ll'bOOOl 0001 101 

31: coeff = ll'bOOOl 00001 00 

33: coeff = irbOOOOIIIIlOO 

35: coeff = 1 1'bOOOO1 1 10101 

37: coeff = 11'b00001101110 

39: coeff = 1 1'bOOOOl 101001 

41 : coeff = 1 1 'bOOOOl 1 001 00 

43: coeff = 11'bOOOOIOIIIll 
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45: coeff = irb00001011011; 
47: coeff = 1 1 'bOOOOl 010111; 
49: coeff = 1 1 'bOOOOl 01 001 1 ; 
51: coeff = ll'bOOOOl 010000; 
5 53: coeff = irbOOOOIOOl 101; 

55: coeff = ll'bOOOOl 00 10 10; 
57: coeff = ll'bOOOOIOOOIH; 
59: coeff = 11'bOOOOI 0001 01; 
61: coeff = ll'bOOOOIOOOOII; 
1 0 63: coeff = 1 1 'bOOOOl 000001 ; 

// 65: coeff = 1 1 'bOOOOOl 11111; 
// 67: coeff = 1 1 'bOOOOOl 11101; 
//69: coeff = 1 1 'bOOOOOl 1 101 1; 
//71: coeff = 11'bOOOOO1 11001; 
15 // 73: coeff = 1 1 'bOOOOOl 1 1 000; 
// 75: coeff = 1 1 'bOOOOOl 10110; 
// 77: coeff = 1 1 'bOOOOOl 10101; 
default: coeff = 11 'bx; 
endcase 

20 

always @ (mod_q or mod_i or qgti) 
begin 

numer = qgti ? nnodj : mod_q; 
denom = qgti ? mod_q : rnodj; 
25 end 

always @ (sum) 

flip = pi_over2 - sum; 

30 // always @ (got) 
// if (got) 

// $display("numer was %d, denom was %d, div then %d", numer, denom, div); 
// always @ (count) 

35 // if (count < 68 ) $display("as far as x to the %0d term, approx = %d", (count-6). 
sum); 

always @ (got_phase) 
begin: display 
40 reg [13:0] real_phase; 

if (phase[13]) 
begin 

real_phase = {-phase + 1); 
45 if (got_phase) $display("%t: got phase, phase 
end 
else 
begin 

if (got_phase) $display("%t: got phase, phase 
50 end 

end // display 

endmoduie 



= -%0d", $time, real_phase); 
= %0d". Stime, phase); 
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While this invention has been explained with reference to the structure disclosed 
herein, it is not confined to the details set forth and this application is intended to cover 
any modifications and changes as may come within the scope of the following claims- 
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CLAIMS 



1 1 . A digital receiver for multicarrier signals comprising: 

2 an amplifier accepting an analog multicarrier signal, wherein said multicarrier 

3 signal comprises a stream of data symbols having a symbol period Tg. wherein the 

4 symbols comprise an active interval, a guard interval, and a boundary therebetween, 

5 said guard interval being a replication of a portion of said active interval; 

6 an analog to digital converter coupled to said amplifier; 

7 an l/Q demodulator for recovering in phase and quadrature components from 

8 data sampled by said analog to digital converter; 

9 an automatic gain control circuit coupled to said analog to digital converter for 

10 providing a gain control signal for said amplifier; 

11 a low pass filter circuit accepting I and Q data from said l/Q demodulator, wherein 

12 said I and Q data are decimated; 

13 a resampling circuit receiving said decimated I and Q data at a first rate and 

14 outputting resampled I and Q data at a second rate; 

15 an FFT window synchronization circuit coupled to said resampling circuit for 

16 locating a boundary of said guard interval; 

17 a real-time pipelined FFT processor operationally associated with said FFT 

18 window synchronization circuit, wherein said FFT processor comprises at least one 

19 stage, said stage comprising: 

20 a complex coefficient multiplier; and 

21 a memory having a lookup table defined therein for multiplicands being 

22 multiplied in said complex coefficient multiplier, a value of each said multiplicand 

23 being unique in said lookup table; and 

24 a monitor circuit responsive to said FFT window synchronization circuit for 

25 detecting a predetermined event, whereby said event indicates that a boundary between 

26 an active symbol and a guard interval has been located. 

1 2. The receiver according to claim 1 . wherein said FFT window synchronization 

2 circuit comprises: 

3 a first delay element accepting currently arriving resampled 1 and Q data, and 

4 outputting delayed resampled I and Q data; 

5 a subtracter, for producing a difference signal representative of a difference 

6 between said currently arriving resampled I and Q data and said delayed resampled I 

7 and Q data; 
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8 a first circuit for producing an output signal having a unipolar magnitude that is 

9 representative of said difference signal of said subtracter; 
10 a second delay element for storing said output signal of said first circuit; 

a third delay element receiving delayed output of said second delay element; and 
a second circuit for calculating a statistical relationship between data stored in 
said second delay element and data stored in said third delay element and having an 
14 output representative of said statistical relationship. 

1 3. The receiver according to claim 2. wherein said statistical relationship 

2 comprises an F ratio. 

1 4. The receiver according to claim 1 . wherein said FFT processor operates in an 

2 8K mode. 
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12 
13 
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9 



5. The receiver according to claim 1. wherein said wherein said FFT processor 
further comprises an address generator for said memory, said address generator 
accepting a signal representing an order dependency of a currently required multipli- 
cand, and outputting an address of said memory wherein said currently required 



5 multiplicand is stored. 



6. The receiver according to claim 5, wherein each said multiplicand is stored in 
said lookup table in order of its respective order dependency for multiplication by said 
complex coefficient multiplier, said order dependencies of said multiplicands defining an 
incrementation sequence, and said address generator comprises: 

an accumulator for storing a previous address that was generated by said 

6 address generator; 

7 a circuit for calculating an incrementation value of said currently required 

8 multiplicand; and 

an adder for adding said incrementation value to said previous address. 

7. The receiver according to claim 6. wherein said lookup table comprises a 
plurality of rows, and said Incrementation sequence comprises a plurality of 
incrementation sequences, said multiplicands being stored in row order, wherein 

In a first row a first incrementation sequence is 0; 
in a second row a second incrementation sequence is 1; 
in a third row first and second break points B1. B2 of a third incrementation 
sequence are respectively determined by the relationships 
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N-1 



n-0 



■N 

n=0 



10 ; and 

11 in a fourth row a third break point B3 of a third incrementation sequence is 

12 determined by the relationship 
13 

83^ = 2 X 4*^ + 2 

14 wherein represents the memory of an Nth stage of said FFT processor 

1 8. The receiver according to claim 1, further comprising channel estimation and 

2 correction circuitry comprising: 

3 pilot location circuitry receiving a transformed digital signal representing a frame 

4 from said FFT processorfor locating pilot carriers therein, wherein said pilot carriers are 

5 spaced apart in a carrier spectrum of said transformed digital signal at intervals K and 

6 have predetermined magnitudes, said pilot location circuitry comprising: 

7 a first circuit for computing an order of carriers in said transformed digital signal 

8 modulo K; 

9 K accumulators coupled to said second circuit for accumulating magnitudes of 

10 said carriers in said transformed digital signal, said accumulated magnitudes defining 

11 a set; and 

12 a correlation circuit for correlating K sets of accumulated magnitude values with 

13 said predetermined magnitudes, wherein a first member having a position calculated 

14 modulo K in each of said K sets is uniquely offset from a start position of said frame. 

1 9. The receiver according to claim 8, wherein said pilot location circuitry further 

2 comprises a bit reversal circuit for reversing a bit order of said transformed digital signal. 

1 10. The receiver according to claim 7, wherein said magnitudes of said carriers 

2 and said predetermined magnitudes are amplitudes. 

1 11. The receiver according to claim 7, wherein said magnitudes of said carriers 

2 and said predetermined magnitudes are absolute values. 
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12. The receiver according to claim 7. wherein said correlation circuitry further 
connprises a peak tracking circuit for determining a spacing between a first peak and a 
second peak of said K sets of accumulated magnitudes. 



1 13. The receiver according to claim 7. wherein said channel estimation and 

2 correction circuitry further comprises: 

3 an interpolating filter for estimating a channel response between said pilot 

4 carriers; and 

5 a multiplication circuit for multiplying data carriers output by said FFT processor 

6 with a con-ection coefficient produced by said interpolating filter. 

1 14. The receiver according to claim 7. wherein said channel estimation and 

2 correction circuitry further comprises 

3 a phase extraction circuit accepting a data stream of phase-uncorrected I and Q . 

4 data from said FFT processor, and producing a signal representative of a phase angle 

5 of said uncorrected data, said phase extraction circuit including an accumulator for 

6 accumulating the phase angles of succeeding phase-uncorrected I and Q data. 

1 15. The receiver according to claim 14. said channel estimation and correction 

2 circuitry further comprises: 

3 an automatic frequency control circuit coupled to said phase extraction circuit 

4 and said accumulator, comprising; 

5 a memory for storing an accumulated common phase error of a first symbol 

6 carried in said phase-uncorrected I and Q data; 

7 wherein said accumulator is coupled to said memory and accumulates a 

8 difference between a common phase error of a plurality of pilot carriers in a second 

9 symbol and a common phase error of corresponding pilot carriers in said first symbol; 
0 an output of said accumulator being coupled to said l/Q demodulator. 



16. The receiver according to claim 15, wherein said coupled output of said 
accumulator is enabled in said l/Q demodulator only during reception of a guard interval 
therein. 



17. The receiver according to claim 14. said channel estimation and correction 

2 circuitry further comprises an automatic sampling rate control circuit coupled to said 

3 phase extraction circuit, comprising: 
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a memory for Storing accumulated phase errors of pilot carriers in a first symbol 
carried in said phase-uncorrected I and Q data; 

wherein said accumulator is coupled to said memory and accumulates 
differences between phase errors of pilot carriers in a second symbol and phase errors 
of corresponding pilot carriers in said first symbol to define a plurality of accumulated 
intersymbol carrier phase error differentials, a phase slope being defined by a difference 
between a first accumulated intersymbol carrier phase differential and a second 
accumulated intersymbol carrier phase differential; 

an output of said accumulator being coupled to said l/Q demodulator. 

18. The receiver according to claim 17, wherein said sampling rate control circuit 
stores a plurality of accumulated intersymbol carrier phase error differentials and 
computes a line of best fit therebetween. 

1 9. The receiver according to claim 1 7. wherein said coupled output signal of said 
accumulator is enabled in said resampling circuit only during reception of a guard 
interval therein. 

20. The receiver according to claim 17, wherein a common memory for storing 
output of said phase extraction circuit is coupled to said automatic frequency control 
circuit and to said automatic sampling rate control circuit. 

21. The receiver according to claim 14, wherein said phase extraction circuit 
further comprises: 

a pipelined circuit for iteratively computing the arctangent of an angle of rotation 
according to the series 

tan-\x) = x-^.^-lL.^-, . ■ |x|<i 
3 5 7 9 
wherein x is a ratio of said phase-uncorrected I and Q data. 



22. The receiver according to claim 21 . wherein said pipelined circuit comprises: 
a constant coefficient multiplier; and 

a multiplexerfor selecting one of a plurality of constant coefficients of said series, 
an output of said multiplexer being connected to an input of said constant coefficient 
multiplier. 
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23. The receiver according to claim 21. wherein said pipelined circuit comprises: 
a multiplier; 

a first memory for storing the quantity x^. said first memory being coupled to a 

first input of said multiplier; 

a second memory for holding an output of said multiplier; and 

a feedback connection between said second memory and a second input of said 

multiplier. 



24. The receiver according to claim 21, wherein said pipelined circuit further 
comprises: 

a third memory for storing a value of said series; 

a control circuit, coupled to said third memory, wherein said pipeline circuit 
computes N terms of said series, and said pipeline circuit computes N+1 terms of said 
series, wherein N is an integer; 

an averaging circuit coupled to said third memory for computing an average of 
said N terms and said N+1 terms of said series. 



25. The receiver according to claim 1, wherein data transmitted in a pilot carrier 
of said multicarrier signal is BCH encoded according to a code generator polynomial 
h(x), further comprising: 

a demodulator operative on said BCH encoded data; 
an iterative pipelined BCH decoding circuit, comprising: 

a circuit coupled to said demodulator for forming a Galois Field of said 
polynomial, and calculating a plurality of syndromes therewith; 

a plurality of storage registers, each said storage register storing a 
respective one of said syndromes; 

a plurality of feedback shift registers, each said feedback shift register 
accepting data from a respective one of said storage registers and having an 
output; 

a plurality of Galois field multipliers, each said multiplier being connected 
in a feedback loop across a respective one of said feedback shift registers and 
multiplying the output of its associated feedback shift register by an alpha value 
of said Galois Field; 

an output Galois field multiplier for multiplying said outputs of two of said 
feedback shift registers; 
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.19 an error detection circuit connected to said feedback shift registers and 

20 said output Galois field multiplier, wherein an ouput signal of said error detection 

21 circuit indicates an error in a current bit of data; and 

22 a feedback line enabled by said error detection circuit and connected to 

23 said storageregisters, wherein outputs of said feedback shift registers are written 

24 into said storage registers. 

1 26. The receiver according to claim 25. wherein said output Galois field multiplier 

2 comprises: 

3 a first register initially storing a first multiplicand A; 

4 a constant coefficient multiplier connected to said register for multiplication by a 

5 value a, an output of said constant coefficient multiplier being connected to said first 

6 register to define a first feedback loop, whereby in a kth cycle of clocked operation said 

7 first register contains a Galois field product Aa^; 

8 a second register for storing a second multiplicand B; 

9 an AND gate connected to said second register and to said output of said 

1 0 constant coefficient multiplier; 

11 an adder having a first input connected to an output of said AND gate; 

12 an accumulator connected to a second input of said adder; wherein an output of 

13 said adder is connected to said accumulator to define a second feedback loop; 

14 whereby a Galois field product AB is output by said adder. 

1 27. A method for estimation of a frequency response of a channel, comprising the 

2 steps of: 

3 receiving from a channel a multicarrier signal having a plurality of data carriers 

4 and scattered pilot carriers, said scattered pilot carriers being spaced apart at a first 

5 interval N and being transmitted at a power that differs from a transmitted power of said 

6 data carriers; 

7 converting said multicarrier signal to a digital representation thereof; 

8 performing a Fourier transform on said digital representation of said multicarrier 

9 signal to generate a transformed digital signal; 

10 reversing a bit order of said transformed digital signal to generate a bit-order 

11 reversed signal; 

12 cyclically accumulating magnitudes of carriers in said bit-order reversed signal 

13 in N accumulators; 

14 correlating said accumulated magnitudes with said power of said scattered pilot 

15 carriers; 
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16 responsive to said step of correlating, generating a synchronizing signal that 

17 identifies a carrier of said multicarrier signal. 

1 28. The method according to claim 27, wherein said step of accumulating 

2 magnitudes comprises the steps of: 

3 adding absolute values of a real component of said bit-order reversed signal to 

4 respective absolute values of imaginary components thereof to generate sums; 

5 respectively storing said sums in said accumulators. 

1 29. The method according to claim 27, wherein said step of correlating said 

2 accumulated magnitudes further comprises the step of: 

3 identifying a first accumulator having a highest value stored therein representing 

4 a first carrier position. 

1 30. The method according to claim 29, wherein said step of correlating said 

2 accumulated magnitudes further comprises the steps of: 

3 identifying a second accumulator having a second highest value stored therein 

4 representing a second carrier position; and 

5 determining an interval between said first carrier position and said second carrier 

6 position. 

1 31 . The method according to claim 27, further comprising the steps of: 

2 comparing a position of a carrier of a first symbol in said bit-order reversed signal 

3 with a position of a carrier of a second symbol therein. 

1 32. The method according to claim 27, further comprising the steps of: 

2 interpolating between pilot carriers to determine correction factors for respective 

3 intermediate data carriers disposed therebetween; and 

4 respectively adjusting magnitudes of said intermediate data carriers according 

5 to said correction factors. 

1 33. The method according to claim 27, further comprising the steps of: 

2 determining a mean phase difference between corresponding pilot carriers of 

3 successive symbols being transmitted in said transformed digital signal; and 

4 generating a first control signal responsive to said mean phase difference; and 

5 responsive to said first control signal adjusting a frequency of reception of said 

6 multicarrier signal. 



NSC30CID: .WO 



ppi94inA? I 



7 
8 



wo 98/19410 PCT/US97/18911 

275 



34. The method according to claim 33, further comprising the steps of: 
determining a first phase difference between a first data carrier of a first symbol 

9 in said transmitted data carrier and said first data carrier of a second symbol therein; 

1 0 determining a second phase difference between a second data carrier of said first 

1 1 symbol and said second data carrier of said second symbol; and 

12 determining a difference between said first phase difference and said second 

13 phase difference to define a phase slope between said first data carrier and said second 

14 data carrier; 

15 generating a second control signal responsive to said phase slope; and 

16 responsive to said second control signal adjusting a sampling frequency of said 

17 multicarrier signal. 

18 35. The method according to claim 34. wherein said step of determining a 

19 difference between said first phase difference and said second phase difference 

20 comprises computing a line of best fit. 
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